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内 容 提要 


我 国 自 行 设计 开发 的 中 华 学 习 机 - 一 适合 
中 小 学 和 家 庭 使 用 的 计算 机 ， 将 走 进 千家 万 
户 ， 它 对 开发 青少年 智力 有 重要 意义 。 

为 了 配合 中 华 学 习 机 的 普及 ， 我 们 编写 了 
这 本 书 。 本 韦 根 据 不 局 晨 次 读者 的 不 同 要 
求 ， 分 为 五 章 讲 了 学 习 机 的 安装 和 使 用 ， 以 及 
与 此 机 配套 使 用 的 语言 ， 即 区 简洁 的 语言 使 各 
类 读者 能 取得 满意 的 效果 。 

本 书 内 容 率 富 、 图 文 并 茂 ， 适 合 中 等 文化 
程度 者 阅读 。 


写 在 前 面 的 话 


当今 时 代 知 识 更 新 加 快 ， 信 息 急骤 变换 ， 传 颖 的 数学 方 
式 面临 着 挑战 ， 加 速 开发 智力 ， 快 出 人 才 已 是 当务之急 ， 中 
华 学 习 机 由 此 应 运 而 生 。 目 前 ， 阁 二 玉 人 全 训 
产 ， 近 期 它 将 以 神奇 的 姿态 “ 间 ” 入 “寻常 百姓 家 ”。 

如 何 更 有 效 地 利用 中 华 学 习 机 开发 儿童 智力 ， 是 值得 
研究 和 探讨 的 新 课题 。 为 此 我 们 编写 了 《掌握 现代 知 力 开发 工 
具 一 一 中 华 学 习 机 少 一 书 ， 献 给 广大 的 青少年 朋友 ， 献 给 为 
下 一 代 日 夜 操劳 的 老师 和 答 答 妈妈 们 。 

在 编写 本 节 的 过 程 中 ， 我 们 做 了 软 深 入 的 调查 。 智 力 开 
发 是 广泛 的 社会 实践 活动 ， 由 于 各 层次 的 读 考 对 掌 操 中 华 学 
习 机 的 要 求 不 同 ， 开 发 智力 的 着 眼 点 不 同 ， 所 以 本 局 拱 不 同 
层次 读者 的 要 求 编 罪 了 学 习 内 容 ， 在 开发 智力 方面 提出 了 一 
些 建议 。 

《 一 小 时 学 会 使 用 中 华 学 习 机 少 ( 第 二 章 )， 从 内 容 讲 是 
可 以 独立 存在 的 ,希望 尽快 掌握 中 华 学 习 机 、 利 用 成 总 软件 开 
发 智力 的 读 岩 ， 可 以 首先 阅读 第 二 章 。 工 作 策 忙 的 爸爸 妈妈 
们 ， 只 要 花 上 一 人 小时 的 学 习 时 间 ， 就 能 与 蕊 子 一 起 享受 电子 
游戏 的 乐趣 ， 功课 紧张 的 学 生花 上 一 小 时 的 学 习 时 间 ， 就 能 
请 到 一 位 耐心 的 “电子 教师 ”。 经 过 教学 实践 证 明 ， 中 华 学 


ee 1 。 


引 机 的 基本 操作 在 一 小 时 之 内 是 完全 可 以 党 所 的 ， 这 出 送 应 
了 时 代 的 快 节 堆 。 

《 驾驭 海 多 六 游 神 表 世 界 》( 第 三 音 ) ， 是 为 早期 开 发 
儿童 智力 而 编写 的 。 泪 老师 和 家 长 的 帮助 下 ， 孩 子 很 容易 学 
会 操纵 海龟 在 屏幕 上 做 各 种 氏 有 风趣 的 图 画 和 游戏 ， 基 至 三 
四 岁 的 孩 了 字 也 能 货 着 他 们 的 直觉 和 感受 来 使 用 学 习 宙 。 从 而 
培养 我 子 的 想象 力 ， 发 挥 他 们 的 创造 性 。 爱 因 斯 坦 说 ， “外 
象 力 比 知 识 更 重要 ， 因 为 知识 是 有 限 的 ， 而 想象 力 概括 希 世 
办 上 的 一 切 ， 推动 着 进步 ， 并 且 是 知识 进化 的 源泉 。?” 成 和 
上 万 的 孩子 从 小 就 爱 上 了 “电脑 ” ， “电脑 ”局 这 了 他 们 的 
开拓 精神 与 创造 欲望 。 这 里 隐 含 了 难以 想 稍 的 潜力 ， 塌 义 读 
有 多 人 么 深远 ! 

《用 智 越 的 铀 古 打 开 知识 室 库 》( 第 四 章 ) ， 从 解决 实 
际 问 题 入 手 ， 深 入 浅 出 地 介绍 了 BASIC 语言 及 编 帮 技 巧 。 
BASIC 语言 是 众多 程序 设计 语言 中 用 得 比较 莹 遍 的 一 种 ， 
适合 初学 者 使 用 。 它 的 特点， 一 是 简单 ， 使 用 范围 广 ， 大 
部 分 教学 辅助 软件 都 是 利用 BASIC 语言 开发 的 ;二 是 直 讽 性 
强 ， 具 有 计算 机 与 人 对 话 的 功能 ， 有 间 有 答 ， 使 用 方便 。 

我 们 学 会 用 BASIC 语言 编写 程序 ， 不 但 可 以 解决 我 们 
身边 的 实际 问题 ， 而 且 可 以 从 中 尽兴 地 发 挥 个 人 的 主观 能 动 
性 秆 创造 力 。 编 写 一 个 较为 复 的 程序 ， 一 百 个 人 如 果 分 别 
独立 进行 程序 设计 ， 编 出 的 程序 虽然 都 能 达到 解决 问题 的 目 
的 ， 却 可 能 没有 某 两 个 程序 是 完全 相同 的 。 六 一 方面 体现 了 
在 程序 设计 中 每 个 人 的 思路 特点 ， 即 各 自 独特 的 吕 活 性 和 创 
2 。 


造 性 ， 它 代 家 着 个 人 的 驹 明 才 智 ， 另 -方面 编制 程序 的 本 身 
就 是 进行 着 结构 性 思维 和 系统 性 思维 的 锻炼 ， 从 而 能 培养 科 
学 的 思维 方法 。 

《现代 智力 开发 工具 一 一 中 华 学 习 机 (第 -- 达 )， 谈 
了 关于 使 用 中 华 学 习 机 开发 儿童 智力 的 一 些 问 题 ， 其 中 介绍 
了 造成 儿童 智力 差异 的 因素 ， 中 华 学 习 机 在 开发 儿童 智力 方 
面 所 能 起 到 的 作用 ， 以 及 如 何 更 有 效 地 开发 儿童 智力 。 作 为 
父母 都 想 使 自己 的 孩子 聪明 能 干 、 出 类 拔 昔 。 本 章 论述 的 问 
题 ， 希 望 对 他 们 能 有 所 启发 。 

《 中华 学 习 机 使 用 指南 》( 第 五 章 ) ， 较 为 系统 地 介绍 
了 中 华 学 习 机 及 其 使 用 方法 ， 供 读者 查阅 。 

总 文 ， 本 书 是 以 不 同居 次 读者 的 要 求 划分 章节 的 ， 恋 者 
可 以 根据 自己 的 需要 选择 有 关 章 节 进 行 学 习 。 

在 编写 本 书 过 程 中 ， 受 到 电子 部 、 清 华 大 学 有 关 间 志 直 
诚 的 帮助 ， 在 此 表示 诡 心 的 感谢 。 由 于 编写 仓促 ， 水 平 有 
跟 ， 不 当 之 处 晨 请 广大 读者 指正 。 
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1. 儿 音 智 力 存在 车 装 异 
我 们 经 常 可 以 镜 到 一 些 人 党 丛 、 妈 妈 们 在 一 起 谈论 镶 子 。 
他 和 有 为 女儿 学 习 成 绩 洋 平 而 发 切 ， 有 的 为 儿子 不 喜欢 给 
通 、 弹 浴 而 和 遗 展 ， 有 的 因 孩 子 注 意 力 不 乐 中 、 学 习 劲 头 不 大 
而 大 动 肝 火 。 
此 章 智 力 莹 异 到 处 可 部 。 园 是 一 个 阁 师 教 的 学 人生， 一 急 
涩 学 课 讲 下 求 , 有 的 孩子 作业 十 分 八 分 钟 就 做 完了 ,而 有 的 出 
要 花 上 一 两 个 小 时。 儿童 智力 水 平 的 高 低 是 通过 他 们 对 事物 
进行 分 析 与 综合 并 做 出 相应 的 反应 而 表现 出 来 的 。 有 的 孩子 
对 所 学 知识 领会 得 快 、 应 用 得 活 ， 葫 于 举一反三 、 触 类 穷 
通 ， 而 者 的 孩子 期 版 上 比 较 刀 钴 ， 学 习 理 解 较 慢 ， 不 能 妮 活 
。 1 。 


解决 问题 。 

儿童 在 进行 智 央 活动 中 所 表现 出 的 敏捷 性 、 灵 活性 、 广 
冰 性 :深刻 竹 、 准 确 性 、 系 统 性 、 创 造 性 的 差异 ， 正 是 儿童 
知 力 水 平 的 高 低 的 反应 。 

2 本 么 是 智力 ， 造 成 儿童 智力 差异 的 原因 是 什么 

智力 是 指 人 认识 客观 事物 并 用 知识 解决 实际 问题 的 能 
力 。 集 中 表现 在 反映 客观 事物 深刻 、 正 确 、 全 面 的 程度 上 各 
应 用 知识 解决 实际 问题 的 速度 和 质量 上 。 对 于 儿童 的 智力 结 
构 ， 一 般 认 为 应 包括 ;观察 力 、 记 忆 力 、 想 象 力 、 注 意 力 、 
思维 能 力 和 操作 能 力 。 

造成 儿童 智力 差异 的 原因 是 什么 呢 ? 一 种 观点 认为 智力 
差异 是 天 生 的 ， 即 遗传 决定 论 ， 另 一 种 观点 认为 差异 由 环境 
决定 ， 即 只 要 对 影响 儿童 所 处 的 环境 条 件 加 以 控制 ， 就 可 以 
把 儿童 培养 成 某 种 类 型 的 人 ， 完 全 香 定 遗传 的 作用 ， 还 有 一 
种 观点 认为 ， 儿 童 智 为 的 发 展 是 出 遗传 和 环境 两 种 因 吗 听 决 
定 的 ， 各 点 一 半 ， 儿 童 智力 的 发 展 是 被 动 的 ， 由 环境 与 教 彰 
在 遗传 素质 上 施加 影响 药 结果 

以 上 观点 都 有 片面 性 ， 我 们 认为 遗传 因素 是 上 儿童 智力 发 
展 的 生理 前 提 ;2 锤 僚 历 史 条 和 件 是 智 万 发 展 的 背景 ,教育 和 环 
境 是 智力 发 展 的 外 部 条 件 ， 泌 童 个 体 的 实践 话 动 是 智力 发 展 
的 基础 ， 儿 童心 理 的 内 部 也 盾 是 智力 发 展 的 动力 。 

首先 ， 我 们 承认 智力 发 展 与 遗传 穴 赋 有 关 健全 的 大脑 
是 儿童 智 为 发 展 的 前 所。 从 生理 解剖 观点 看 ， 一 般 正 常 的 儿 
童 虽 然 无 遗传 缺陷 ;但 由 于 每 个 邢 介 遗传 的 基因 不 同 , 则 他 们 
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的 大 脑 和 感 党 器 官 的 生理 解剖 特点 不 同 。 比 如 ， 有 的 片 音 细 
胞 核 内 少 一 条 X 染色 体 , 结 果 会 造成 这 个 孩子 语言 能 力 很 强 ， 
而 空间 知觉 较 差 s 所 以 说 * 址 传 因素 是 形成 智力 差别 的 生理 前 
提 。 但 是 如 果 说 遗传 决定 智力 水 平 的 高 低 , 则 是 错误 的 * 因 为 
另 一 方面 应 看 到 环境 和 教育 是 智力 发 展 的 外 部 条 件 ! ;幼苗 是 
否 能 长 成 参天 大 树 ， 那 要 看 它 的 生活 条 件 ; 从 玉石 到 精美 的 
工艺 品 要 车 独具匠心 地 同 刻 。 更 扎 特 .3 岁 就 能 演 考 钢琴 ， 约 
输 "斯 图 尔 特 弥 尔 ,3 岁 就 能 看 懂 拉 本 文 的 古典 著作 ， 全 靠 他 
们 的 父亲 所 进行 的 严格 而 有 计划 的 教育 。 

心理 学 家 斯 基 尔 斯 兽 对 环境 的 影响 进行 予 专门 的 对 比 古 
究 。 他 把 孤儿 院 2 岁 的 婴 光 分 成 两 组 ， 一 组 为 实验 组 ， 由 锡 
为 比较 姜 的 13 名 儿童 〈 平均 智商 为 63.4 ) 组 成 ， 送 至 有 社交 
刺激 的 环境 中 培养 ， 另 一 组 由 比较 聪明 的 12 名 上 几 童 〈 平均 智 
高 为 8647 ) 组 成 ， 留 在 孤儿 院 仙 乏 社交 蓝 激 的 环境 中 竺 活 。 
一 年 半 后 发 现 ， 原 来 较 笔 的 此 童 智商 提高 了 《平均 91.8 ) ， 
而 原来 较 聪 明 的 儿童 的 智 高 反而 下 降 了 ( 平均 60.5 ) ， 到 成 
年 以 后 ， 原 来 较 繁 的 儿童 在 学 习 与 工作 方面 也 比 原来 聪明 的 
儿童 强 得 多 。 ( 引 自 [ 美 ] 克 雷 奇 等 著 《 心 理学 纲要 》) 

这 说 明 ， 即 使 具有 和 较 好 揭 先 关 素 质 ， 离 开 了 环境 与 教育 
的 影响 也 不 能 成 才 。 

上 半音 智力 的 发 展 不 是 被 动 地 接受 外 界 条 件 欧 影响 ， 而 是 
通过 此 童 个 体 实 跨 活动 得 以 发 展 的 .恩格斯 指出 , “人 的 智力 
是 按照 人 如 何 学 会 改变 舟 然 界 而 发 展 的 ”。 丛 秒 理 学 观点 
看 ， 人 生 下 来 脑 细胞 几乎 没有 功能 , : 随 着 外 界 的 刺激 ， 时 间 
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的 推移 ,智慧 的 增长 ， 分 散 的 闹 纲 胞 才 集 结 起来 ， 机 环 炮 
系 ， 脑 功能 逐 落 健全 。 镁 样 ， 泌 童 的 观 奉 万 记忆 为 想 莹 
大 三 维 办 等 都 林 是 通过 家 拱 习 救 师 单 方面 的 孝 接 所 能 发 展 
的 ,而 是 通过 儿童 自己 狐 立 的 活动 才 得 到 发 展 的 。 

另外 汇 童 智力 的 发 展 是 靠 内 外 因 的 相 家 作用、 外 互联 
系 、 相 阳 影 响 取 得 的 。 比 好 孩 书 上 课 学 习 了 四 出 运 算 ， 而 原 
先 对 些 并 没 议 识 ,这 就 需要 通过 课堂 教 《 外 因 )， 个 天 理解 和 
是 维 (内 因 ) 来 认识 ;再 动手 运算 ， 灿 深 体会 直到 逐步 掌握 
四 则 运算 ， 这 个 从 不 会 到 会 就 是 依赖 隆 遗 忧 的 因素 、 环 境 与 
教育 的 条 件 ， 同 时 又 取决 乎 上 童心 理 的 内 部 矛盾 ，. 内 凡 由 外 
因 前 转化 而 提高 智力 。 所 以 说 几 音 智力 发 展 的 效果 到 次 于 疱 
童 个 大 的 实践 和 主观 能 动 性 发 挥 的 程度 。 我 们 的 一 些 爸 葡 妈 
妈 们 对 孩子 操心 过 度 , 上 冰 代 赫 水 多 ， 这 种 自 以 为 对 儿童 教 
育 有 利 的 做 法 ; 实际 是 无 意 地 影 喝 和 限制 池北 赣 智力 的 发 
展 ， 扼 杀 子 镑 子 的 创造 性 和 主观 能 动 性 。 

中 华 学 习 机 可 以 作为 你 教育 孩子 的 得 力 助手 。 


二 、 谈 谈 中 华 学 习 机 


8 .教育 改革 的 大 趋势 

近 车 来 ， 新 技术 飞速 发 展 ， 知 识 更 新 空前 如 快 ， 据 统 
计 y 近 30 年 人 们 创造 的 科学 技 米 知识 超过 了 过 去 儿 十 万 年 间 
人 类 知识 的 总 和 。 人 们 面临 着 挑战 ， 不 断 更 新 的 知识 、 无 限 
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的 书籍 和 报刊 等 资料 与 人 们 省 限 的 阅读 时 间 之 癌 的 有 矛盾; 按 
攻 简 级 数 膨 忧 的 许 杂 纷 云 的 朋 总 万 变 的 信息 流 ， 与 大 们 的 理 
解 币 力 ` 控 制 能 为 和 应 用 能 力 的 了 矛盾。 如果 二 成 不 变 地 按照 国 
定 前 传统 方式 数 与 学 ， 是 永远 也 赶不上 急 梭 变 化 的 知识 流 与 
信息 流 的 。 传 统 的 教育 形式 、 教 育 方法 ,教育 内 容 以 及 教学 管 
理 都 辟 进 行 改 革 ， 计 算 机 与 基础 狼 育 、 罕 庭 教育 相 结 合 ， 是 
教育 改革 的 大 趋势 。 当 前 ， 世 界 上 许多 国家 的 计算 机 教育 重 
点 以 局 人 的 速度 进入 中 学 、 
小 学 和 家 庭 。 普 及 型 计算 机 党 
(学 习 视 豆 形 成 系列 。 府 
生 本 ， 目 前 平均 每 6 户 一 台 
学 习 机 ， 美国 1984 年 销售 家 
庭 用 学 习 机 450 万 人 台 3;1986 年 
销售 380 万 台 ， 平 均 每 6 个 人 一 人 台 学 习 机 。 

从 另 一 个 角度 讲 ，“ 计 算 本 科学 将 继 上 自然 语言 、 数 学 之 
后 ， 成 为 第 半 位 对 人 的 终生 都 有 大 用 的 “通用 智力 工具 ”， 
这 是 20 年 前 美国 著名 计算 机 科学 家 G。 伏 特 斯 的 预言 ， 今 天 
乌 被 证 实 ， 将 来 必定 进一步 被 证 实 。 

外 国人 往往 欣赏 中 国人 的 聪明 才智 。 古 老 文 明 的 中 华 民 
族 ， 有 着 丰富 的 智力 资源 和 脑力 劳动 优势 ， 但 是 我 们 是 否 考 
虑 过 ， 社 会 发 展 到 今天 ， 如 果 不 同时 有 效 地 利用 “电脑 ”， 
这 个 大 议 的 优势 就 会 丧失 ， 或 者 说 不 懂 矢 利用 电脑 的 人 脑 ， 
会 落后 于 用 电脑 作为 辅助 的 工具 的 “人 脑 ” 的 。 

当前 ， 我 们 不 少 人 已 认识 到 计算 机 作为 通用 智力 工具 的 
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战略 意义 。 如 果 我 们 在 智力 开发 上 不 充分 利用 计算 机 ，. 将 会 
与 经 济 发 达 的 国家 造成 更 大 的 差距 。 在 今后 十 年 或 十 泻 年 内 
走 上 工作 岗位 的 亿 万 申 、 小 学 生 必 须 迅速 掌握 信息 时 代 的 二 
具 一 一 计算 机 并 在 学 习 计算 机 的 过 程 中 开发 智力 。 这 也 是 
追 在 层 睫 的 问题 。 


4: 什 么 是 中 华 学 习 机 


中 华 学 习 机 是 我 国 自行 开发 的 ， 适 合 中 学 、 小 学 及 家 庭 
进行 智力 开发 、 辅 助教 学 、 事 务 管理 的 微型 计算 机 系列 ， 它 
与 APPEL-I (苹果 机 2》 兼容 ,是 由 国家 科 委 、 国 家 教委 、 
电子 部 等 单位 联合 组 织 开 发 的 。 现 在 我 国 已 有 30 多 个 厂家 生 
产 ， 投 放 市 场 的 有 CEG- 工 中 华 学 习 机 ，CEC- 工 型 中 华 学 
习 机 正在 开发 ，“ 小 蜜蜂 ”中 华 学 习 机 已 经 过 鉴定 。 

中 华 学 习 机 适合 中 国 的 国情 ,. 它 性 能 价格 比 高 ， 汉 字 功 
能 强 ， 在 目前 大 多 数 家 庭 都 有 电视 机 和 收录 机 的 情况 下 ， 只 
要 再 买 一 台中 华 学 习 机 作为 主机 ， 以 电视 机 作为 显示 器 ， 用 
一 般 家 用 收录 机 作为 外 存 贮 器 ， 就 可 以 组 成 微机 系统 ，. 再 选 
用 盒 式 录音 带 录 制 的 教学 软件 和 游戏 软件 ， 便 可 以 在 家 里 上 
机 了 。 


5. 中 华 学 习 机 能 帮 有 我 们 做 些 什么 


(1) 中 华 学 习 机 一 一 幼儿 的 好 朋友 
现在 年 轻 的 爸爸 妈妈 们 都 感到 独生子 女 孤 单 得 很 ， 想 给 
孩子 找 个 好 朋友 ， 中 华 学 习 机 是 可 以 胜任 的 。 
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中 华 学 习 栅 可 称 为 万 能 
游戏 机 ， 目 前 的 不 少 游戏 软 
件 都 订 以 在 中 华 学 习 机 寺 运 
行 ， 比 如 《空间 厌战 少 、 
《 酒 肥 方 、《 海 战 六 等。 在 
游戏 中 总 有 一 个 对 手 和 孩子 
比赛 (学 习 机 可 充当 对 手 )， 
比赛 过 程 中 可 以 使 孩子 感受 到 胜利 的 喜悦 和 失败 的 苦恼 。 从 
而 锻炼 了 观察 能 力 、 反 应 能 力 和 稳定 而 持久 的 注意 广 .变换 葛 
测 的 电子 游戏 将 给 和 孩子 带 来 极 居 的 乐趣 ， 扩 大 了 孩子 的 视 
野 。 

中 华 学 习 机 以 它 鲜艳 的 色彩 、 变 化 的 图 像 、 模 拟 的 志 
响 ， 让 和 孩子 在 玩 的 过 程 中 受到 视 党 和 听觉 的 锻炼 ， 同 时 还 学 
会 认识 动物 ， 分 辨 颜 色 、 形 状 ， 数 数 和 比较 数 的 大 小 。 当 和 孩 
子 回答 对 时 ， 屏 殴 上 就 可 以 显示 分 数 和 半 美 的 动画 ”还 可 以 
本 上 一 段 音 乐 给 以 鼓励 。 

在 操作 中 ， 和 孩子 需要 学 习 使 用 键盘 。 对 幼儿 进行 指法 训 
练 能 铂 炼 他 们 手 脑 并 用 ， 同 时 也 从 小 教会 他 们 打字 的 技能 。 

当 和 孩子 们 坐 在 荧光 屏 前 用 LOGO 语 言 使 海 危 作 畏 时 ， 房 
幕 上 将 随 着 孩子 的 操作 而 出 现 千 奇 百 怪 的 图 形 ， 这 时 孩子 将 
展开 想象 的 咎 膀 在 幻想 中 得 翔 。 

中 华 学 习 机 不 但 帮助 爸爸 妈妈 们 启迪 了 孩子 们 的 智慧 
也 一 定 会 成 为 他 们 的 好 朋友 。 

(2) 中 华 学习 机 一 一 课堂 数学 的 助手 


中 华 学 习 机 可 以 以 它 直观 而 形象 的 通 而 模拟 一 些 难以 实 
际 操 作 的 实验 志 程 和 难以 表达 的 态 的 .立体 的 图 形 .比如 数 
学 中 各 种 函数 的 图 像 ， 立 体 几何 由 的 复杂 图 形 , 都 可 以 利 导 
中 华 学 习 机 所 具有 的 动态 图 形 方式 去 表现 函 歼 的 轨迹 及 立体 
图 形 的 旋转 。 这 有 助 于 老 归 的 诽 述 和 学 生 的 理 保 使 他 俱 在 弃 
松 愉快 的 气氛 中 完成 数学 任务 。 

物理 实验 是 物理 教学 的 重要 内 容 * 1 目前 由 于 不 少 中 学 受 
实验 条 件 的 限制 ,使 得 许多 实验 无 法 进行 。 申 华 学 习 机 可 以 
充当 实验 窜 ， 模拟 物理 实验 ， 图 实 并 茂 ， 动 天 表演 形象 直 
观 。 比 如 物体 沉浮 条 件 实 验 ;学 生 位 坐 在 中 : 华 党 司机 
显示 器 屏幕 前 ， 便 可 以 看 到 物体 在 各 种 条 件 下 沉浮 的 情况 - 
并 且 从 审 华 学 习 机 的 扬声器 中 传 出 的 絮 邵 动听 的 讲解 ， 使 沧 
生 处 于 视觉 和 听 党 的 双重 刺激 之 中 ， 从 而 加 深 对 此 概念 的 理 
解 。 

在 化 学 学 习 中 ,中 华 学 习 要 更 可 以 大 显 身手 -了 如 它 可 
以 用 来 解决 某 些 微观 现象 变化 的 过 程 ,， 助 鸡 $. 亚 层 电子 去 和 
P 亚 层 电子 云 形 成 的 过 程 ， 在 室 间 的 形状 .伸展 放 向 %: 密 度 
等 等 ; 对 电子 云 概念 的 形成 起 到 也 直观 形象 的 作用 。: 饲 时 还 
可 以 用 来 演示 愿 所 核 外 电子 运 
动 状态 ， 从 而 解决 化 学 中 这 一 
难点 。 

当然 ， 上 面 列 举 的 仅仅 是 
中 华 学 习 机 用 于 辅助 教学 的 极 
少 一 部 分 ， 但 足以 说 明 中 华 学 
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习 机 一 一 课堂 教学 的 助手 。 

(3) 中 华 学 习 机 一 一 耐心 的 家 庭 教师 

在 课外 ， 引 华 学 习 楷 娃 以 充当 家 庭 教师 ， 去 辅导 、 叔 促 
孩子 们 学 习 。 

比 关 ， 中 华 学 习 杭 能 帮助 小 学 生 复习 巩固 汉语 拼音 的 拼 
读 方 法 ， 还 能 帮助 他 们 进行 口算 练习 ， 讲 解 各 类 应 用 题 。 

中 华 学 习 机 能 给 孩子 们 出 题 考试 ， 完 成 后 当场 评分 ， 并 
显示 答案 。 

中 华 学 习 机 除了 可 以 辅导 中 学 生 复习 英语 单词 、 解 数学 
习题 ,提出 有 关 元 素 周 期 表 的 问题 处 ,还 可 以 回答 学 生 的 疑难 
问题 .当然 ,有 的 问题 它 会 给 出 正确 的 回答 ， 有 的 问题 或 许 学 
习 机 一 上 时 答 不 出 来 〈 软件 不 可 能 面 面 具 到 ) ， 这 时 ， 你 便 可 
以 从 书本 上 查 出 正确 答案 告诉 中 华 学 习 机 ， 这样 ， 它 就 学 会 
了 ， 下 次 再 问 到 这 个 问题 时 ， 它 就 能 回答 出 来 了 。 

中 华 学 习 机 对 高 考 的 学 生来 说 帮助 会 更 大 ， 它 可 以 将 大 
量 的 历届 高 考试 题 、 练 习题 存 贮 起 来 ， 当 考生 复习 到 某 门 功 
课 、 某 一 部 分 时 ， 学 习 机 会 自动 地 列 出 让 应 的 试题 供 学 生 
水 习 ， 并 能 批改 和 给 出 标准 答案 。 不 论 你 什么 时 候 需 要 它 的 
攻 芭 ， 不 论 你 需要 重复 多 少 遍 ， 它 总 是 不 大 其 需 一 一 真能 称 
得 上 耐心 的 家 许 族 币 。 

(4) 申 华 学 习 机 一 一 软 硬 件 的 开发 工具 

中 华 学 习 极 还 可 以 在 企业 决策 、 方 案 巴 算 、 工 业 控 制 、 

让 动 夏 、 财 会 管理 以 及 人 工 智 能 等 方面 广泛 应 用 。 

中 华 学 习 桃 还 能 作为 软 硬 件 开 发 的 工具 在 更 加 广泛 的 令 
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域 里 发 挥 作用 。 

(5) 中 华 学 习 机 一 一 认 
真 负责 的 管家 3 

中 华 学 习 机 可 以 帮 你 建 谋 
立 家 庭 档案 ， 记 下 值得 纪念 
和 庆贺 的 日 子 ， 如 家 庭 成 员 和 亲友 的 生日 ， 还 可 以 承担 家 宪 
财务 管理 ， 记 下 存款 的 数目 、 日 期 ， 号码 及 物品 的 存放 地 
点 。 

中 华 学 习 机 还 可 以 帮助 你 编写 资料 ”比如 你 零乱 的 、 随 
机 输入 的 资料 ， 它 可 以 帮 你 归纳 整理 ， 以 宇 打 印 在 纸 上 。 如 
果 你 要 查找 某 些 资料 ， 它 便 可 以 迅速 完成 ， 做 到 准确 无 误 ; 

随 着 家 庭 现代 化 程度 的 提高 ， 家 用 电器 逐步 增多 ， 如 何 
将 它们 管理 起 来 从 而 更 有 效 地 发 捧 作 用 呢 ? 在 这 方面 学 习 袖 
堪 称 行家 里 手 ， 将 家 庭 中 24 小 时 之 内 需要 做 的 工作 编 成 程序 
送 入 学 习 机 当然， 除 中 华 学 习 机 主机 外 ， 还 要 有 相应 的 接 
口 电路 、 转 换 器 等 ) 这 样 ， 各 种 家 用 
电器 便 可 在 中 华 学 习 机 的 控制 下 按 程 
序 工作 了 。 

(6) 中 华 学 习 机 一 一 家 庭 娱 乐 的 
多 面 手 

人 们 在 物质 生活 水 平 提高 的 基础 
上 ， 对 精神 生活 的 需要 也 卓 益 增强 ， 
学 习 机 可 以 作为 电子 游戏 机 供 全 家 人 
娱乐 ， 还 能 障 着 你 下 象 柑 、 围 棋 。 
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中 华 学 习 机 设 有 发 声 装置 ， 通 过 程序 控制 可 以 发 出 各 秆 
奇妙 的 声音 ， 可 以 谱写 乐 曙 ， 撑 可 以 沿 作 电子 琴 进 符 弹 卖 。 

总 之 ， 中 华 学 习 机 在 学 校 。 家 庭 和 其 它 方面 有 广泛 的 应 
用 价 信 。 随 着 对 中 华 学 习 机 系列 软件 的 研制 和 开发 ， 用 途 将 
会 更 加 广泛 ， 以 至 会 起 到 我 们 意 想不到 的 作用 。 


6. 中 华 学 习 机 是 如 何 工 作 的 


从 上 述 事 例 可 知 ， 中 华 学 习 机 可 以 为 我 们 做 许 许多 多 的 
事情 ，; 真 有些 “神奇 的 麻 力 ”了 。 那儿 它 的 魔力 来 .自杀 
方 呢 ? 今天 就 让 我 们 揭 开 这 个 秘密 ， 看 一 看 它 是 如 何 工 作 
的 ， 

我 们 首先 来 分 析 一 下 人 脑 是 如 何 处 理 问 题 和 解决 问题 
的 。 

人 的 解 题 过程 大 致 如 下 ，. 通 过 眼 和 耳 洒 等 感觉 器 官 将 看 
到 的 和 听 到 的 问题 送 入 大 脑 〈 输 入 >》。 大 脑 的 中 枢 神经 经 过 
分 析 ， 指 挥手 、 中 等 器 家 或 者 运用 工具 去 执行 、 去 计算 ( 控 
制 、 运 算 )。 然 后 将 执行 或 运算 的 结果 通过 史 说 ,手记 等 方 
式 表 现 出 来 (输出 ) 。 

而 中 华 学习 机 作为 “电脑 ”的 一 种 ，: 它 又 是 如 何 摸 仿 人 : 
脑 进行 工作 呢 ? 这 就 要 看 组 成 电脑 的 各 部 分 结构 以 及 它们 之 
闻 是 如 何 协调 工作 的 。 

味 华 学 习 机 大 致 分 为 以 下 儿 个 部 分 ， 

(1: 答 入 设备 

它 就 像 人 的 眼 和 耳 , :负责 接收 信息 ， 并 且 转 : 换 为 计算 
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机 可 芭 存放 的 形式 ， 存 入 内 存 贮 器 很 存 。 因 此， 可 以 说 输入 
设备 是 计算 机 与 外 办 进行 联系 的 组 带 。 

中 华 学 习 机 的 主要 输入 设备 是 键盘 ， 它 安装 在 主机 外 过 
上 ， 兴 有 69 个 键 ， 包 括 标准 打字 机 键盘 的 各 种 链 ， 并 上 且 按 归 
标准 打字 机 的 键 位 排列 。 键 盘 的 作用 是 通过 操作 者 按键 鼻 芋 
的 键 ， 便 可 以 把 信号 送 入 计算 机 。 所 以 掌握 好 键盘 操作 ， 模 
可 以 迅速 地 将 信息 送 入 计算 机 。 

(2) 内 在 贮 器 

存 赔 器 是 计算 机 的 记 忆 装 置 ， 它 的 存在 ) 使 计算 机 有 了 
记忆 功能 。 

存 贮 器 又 分 为 内 存 贮 器 利 外 存 贮 器 。 内 存 迪 回 安装 在 主 
机 箱 内 ， 它 是 由 半导体 元 件 组 成 的 ， 读 写 速度 快 ， 

内 存 贮 器 像 一 个 巨大 的 “仓库 ”， 每 一 层 都 排列 着 很 多 
De 

。“ 僵 子 ”内 存放 若干 位 二 进 制 信息 ,每 个 “盒子 ” 里 的 

和 -个 字 。 一 个 字 所 包含 的 二 en 
长 ”-。 计 算 机 的 字 长 越 长 ， 计 算 的 精确 度 就 越 高 中华 学 
机 证 由 和 
存放 八 位 三 进 制 代 码 * 一 般 习 惯 称 信 位 三 进 制 代 码 为 一 个 字 
节 。 因 此 ， 中 华 学 习 机 的 二 不 存 贮 单元 存放 一 个 字 节 的 二 进 
制 代码 。 

站 贮 单元 的 多 少 老 示 了 存 贮 器 容量 的 大 小 ， 存 贮 办 的 容 
量 以 作为 单位 ，1K=208=1024 个 存 贮 单元 。 中 华 学 习 机 的 
随机 看 账 器 有 64K , 即 65536 个 存 贮 单元 。 
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内 存 贮 器 又 分 为 随机 存 贮 器 (了 RAM) 、 只 该 存 赂 吉 
(ROM ) 和 可 编程 只 读 存 贮 器 (EPROM ) 三 种 。 

随机 存 贮 器 (了 RAM ) 又 称 为 读 写 存 贮 器 ,可 以 随时 写 入 
或 读 出 。 但 一 旦 切断 电源 ， 信 息 便 会 全 部 消失 ，。 

只 读 存 贮 器 ((ROM ) 是 一 种 一 旦 “ 编 入 程序 ”之 
后 ， 就 只 能 进行 读 操作 的 存 贮 器 ， 但 当 电 源 被 归 断 之 后 ， 信 
息 仍 能 保留 。 所 以 常用 来 存放 不 变 的 程序 和 常数 。 中 华 学 司 
机 有 32 玫 的 ROM， 上 面 闫 化 着 监控 程序 和 了 BASIC 语言。 

可 编程 的 只 读 存 贮 器 (了 EPROM ) ， 故 名 思 意 ， 存 贮 的 
肉 容 可 由 用 户 抹 去 ， 但 发 再 次 写 入 必须 使 用 电 坟 冲 。 

到 键盘 接受 到 信息 之 后 ， 党 进行 转换 ， 使 之 成 为 计算 机 
可 以 接 电 的 性 息 ， 然 后 旭 同 大 脑 记忆 一 样 ， 将 此 信息 记 人 入 内 
存 贮 器 ， 药 时 保存 下 求 。 

(3》 控制 回 

控制 器 就 如 同人 的 大 脑 中 枢 神 经 一 样 ， 指 控 善 备 部 分 协 
调 工作 。 

前 面 讲 到 键盘 接受 到 信息 之 后 存放 在 内 存 贮 器 年。 信息 
可 以 分 为 两 部 分 : 一 部 分 为 数据 ， 另 一 部 分 为 命令 或 程序 指 
令 。 指 令 来 自 于 人 们 编制 的 程序 。 计 算 机 在 工作 时 ， 控 制 器 
就 一 条 一 条 地 将 命令 或 指 念 取 出 ， 分 析 各 条 指令 〈 命令 ) 是 
村 进行 佬 么 操作 ， 操 作 的 数据 存放 在 内 存 娜 一 个 单元 ， 然 后 
指挥 各 部 分 去 工作 。 

《4) 运算 器 

运算 器 是 在 控制 器 的 控制 下 完成 各 种 算术 运算 和 逻辑 运 


算 的 部 件 。 在 运算 过 程 中 ， 不 断 地 从 存 贮 器 取出 数据 ， 并 将 
计算 结果 送 入 内 存 贮 器 保存 起来 。 

人 们 把 控制 器 ， 琴 存 几 器 和 运算 器 谷 称 为 中 央 处 理 机 或 
主机 ， 简 称 CPU 即 英语 "CENTRAR PROCESSTING 
BNIT' 的 字 头 ) 。 它 是 计算 机 的 核心 ， 它 使 计算 机 有 了 分 析 
问题 和 处 理 问 题 的 能 力 ， 即 成 为 “电脑 ”。 中 华 学 习 机 的 中 
央 处 理 机 CPU 是 6502， 它 是 一 个 八 位 处 理 器 。 时 钟 频 率 为 
1MHz, 数 据 总 线 八 条 ,地 址 总 线 16 茶 ， 寻 址 空间 64 攻 字 节 ， 
它 安装 在 主机 线路 板 上 。 除 此 之 外 ， 主 机 线路 板 上 还 装 有 
64 玉 的 随机 存 贮 器 、32K 的 只 读 存 贮 器 、 存 贮 管理 部 件 
MMU、 输 入 /输出 管理 部 件 IOU， 可 编程 阵列 部 件 PAL。 
另外 还 留 有 扩充 汉字 系统 的 插座 。 若 需要 增加 汉字 系统 只 要 
择 上 一 片 固 化 有 汉字 系统 的 ROM 片 池 27256， 两 片 固化 有 汉 
字 字 库 的 ROM 片 子 和 两 片 TTEL 电 路 即 可 。 

(5) 外 存 贮 器 

内 存 贮 器 虽然 具有 读 写 速度 快 的 特点 ， 但 是 由 于 它 的 存 
贮 容量 有 限 ， 并 且 信息 不 能 长 期 保存 ， 因 此 ， 又 设置 了 外 存 
贮 器 ， 外 存 贮 器 都 是 利用 磁性 材料 的 剩 磁 效 应 一 一 靠 磁头 把 
需要 的 信息 存 入 或 读 出 。 

中 化 学 习 灿 的 外 存 贮 器 采用 磁带 机 《可 以 用 录音 机 来 代 
替 ') 和 软磁盘 存放 暂时 用 不 到 的 信息 ， 同 时 也 可 -以 随时 同 
内 存 锭 器 安 换 信息 。 例 如 将 录音 机 连 在 主机 上 ， 便 可 以 很 方 
便 地 把 信息 从 内 存 贮 器 存 入 磁带 或 者 从 磁带 读 入 内 存 。 

软 磁 攀 机 存 贮 信 息 比 录音 机 速度 快 ,容量 大 ,而 且 动 作 可 
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千 。 它 由 磁盘 驱动 接口 、 磁 盘 机 、 磁 盘 三 部 分 组 成 。 磁 可 驱 
动 搂 蝇 卡 是 主机 和 磁盘 之 间 传 送信 息 的 桥梁 ， 这 部 分 已 做 在 
主机 板 上 。 破 盘 机 本身 与 唱机 相似 ， 由 一 个 电 机 带 台 磁 起 转 
动 ， 机 上 有 一 个 磁头 可 读 取 磁盘 上 的 信息 或 者 将 信息 罕 到 磁 
抢 上 。 

外 存 贮 加 如同 我 们 在 记忆 时 需要 将 一 些 信 息 记 在 纸 上 或 
本 子 上 一 样 ， 一 且 忘 记 ， 便 可 以 从 外 存 贮 回 本子 ) 上 获 
取 。 

(6) 输出 设备 

计算 机 在 运行 申 出 现 了 问题 该 如 何 量 示 呢 ? 或 者 计算 
的 结果 如 何 表示 出 来 呢 ? 这 需要 有 输出 设备 。 有 目前 微型 计算 
机 主要 的 输出 设备 是 显示 器 和 打印 机 ， 显 示 器 可 以 随时 将 我 
们 输入 的 命令 、 程 序 显 示 出 来 ， 也 可 以 将 计算 结果 显示 出 
来 ， 而 打印 机 则 是 将 这 些 信息 打印 在 纸 土 。 中 华 学 习 机 的 显 
示 回 可 以 用 黑白 电视 机 或 者 彩色 电视 机 来 代替 ， 而 打印 机 多 
采用 点 阵 式 的 打印 机 ， 加 MX-80、FEX-80、MX-100、 
FX-100 等 型 号 打字 机 。 

通过 以 上 的 介绍 ， 大 概 允 此 脑 是 如 何 王 作 的 过 程 有 了 一 
些 了 解 ， 它 的 结构 模拟 了 我 们 人 脑 ， 因 而 能 分 析 :、 处 理 问 
题 。 

总 之 ， 中 华 学 习 机 是 这 样 工作 的 ， 

全 从 键 稚 (输入 设备 ) 接受 信息 (键入 的 程序 .指令 或 数 
据 ) ,也 可 以 从 磁盘 或 者 磁 带 上 外 存 贮 器 ) 直接 接受 信息 
《事先 已 经 存 贮 在 上 面 的 程序 或 数据 ) 。 
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从 接 受到 的 入 息 可 以 直接 显示 在 屏幕 上 供 人 们 了 解 或 仍 
改 ， 岗 时 圭 换 成 计算 向 本 以 接受 的 信息 存 几 在 闪存 贮 器 里 。 

国术 制 器 将 接收 到 的 程序 或 指令 其 内 看 迪 器 里 取出 并 进 
行 分 析 ， 然 后 协调 中 华 学 习 机 的 各 个 部 分 工作 。 同 时 ， 根 入 
程序 中 指 由 的 操作 数 地 址 ， 将 操作 数 取 出 送 入 运算 器 。 

全 运算 回 在 控制 器 控制 下 完成 各 种 运算 。 

含 运算 的 结果 送 显示 器 和 打印 机 输出 设备 ) ， 必 要 时 
送 磁 盘 或 磁带 ( 外 存 贮 器 ) 保存 起 来 。 

图 1 一 1 是 中 华 
学 习 机 系统 组 成 图 。 

除 此 之 外 ， 中 华 
学 习 机 还 具有 有 汉字 答 
入 、 输 出 动能 ， 这 样 
一 来 就 给 使 用 浇 带 来 

图 1-1 极 大 的 方便 ， 中 华 学 
习 机 的 汉字 系统 是 采用 固化 的 ROM， 因 此 可 以 节省 内 存 窍 
间 ， 而 且 实现 起 来 也 很 方便 。 

中 华 学 习 机 和 化 果 机 (APPLE-ETE 机 ) 兼 容 。 它 的 功能 
相当 平一 侣 华 果 机 ， 而 且 有 所 增强 ， 能 够 在 莘 果 机 上 运行 的 
各 种 软件 在 中 华 学 习 机 上 都 能 运行 ， 这 样 … 来 ， 就 为 中 华 学 
习 机 的 推广 提供 了 极 大 的 方便 。 


立 、 中 华 学 习 机 为 什么 能 有 助 子 
开发 儿童 智力 


前 谭 提 到 智力 结构 包括 感知 力 \ 注 意 力 ,记忆 力 、 志 维 能 
力 、 想 象 能 力 以 及 反 作 能 力 等 ， 并 且 还 提 到 智力 开发 的 关键 
是 儿 曾 个 大 的 实 虐 和 李 前 主观 能 动 性 发 挥 的 程度 。 在 这 些 广 
而 ;中 华 学 习 极 能 为 开发 上 童 的 移 力 尖 显 野手 。 


7. 中 华 学 习 机 能 使 儿 意 提 高 感知 力 


有 发 营 感 乔 为 昵 ? 

感知 为 是 指 客观 事 牺 作用 下 类 前 感觉 器 官 后 ， 而 在 头脑 
中 产生 的 反映 能 力 。 感 知 是 认识 容 观 训 驳 的 开端 。 

感知 力 包 括 视 觉 、 听 党 ,空间 知觉 利 时 间 知 觉 ,人 们 的 感 
知 为 是 在 实践 活动 中 发 展 起 来 的 ， 它 是 反映 人 们 智力 高 低 的 
显 落 标 志 。 

中 华 学 习 机 以 它 直 观 形 每 的 商 面 和 模拟 音响 来 刺激 儿童 
的 多 种 感 党 ， 提 高 视觉 能 力 〈 色彩 、 色 度 和 形状 的 辨别 》 得 
听觉 能 力 〈 音调 的 高 低 ) 。 

中 华 学 习 机 在 运行 应 用 程序 或 者 游戏 程序 时， 速度 是 
非常 快 的 。 这 就 激发 儿童 在 人 一 机 对 话 中 要 反应 敏捷， 地 
速 作 册 贺 答 。 游戏 程序 更 能 刺激 此 童 的 感 牢 。 它 一 般 都 以 
紧张 的 节奏 ， 瞬 息 变化 的 着 而 出 现 。 如 在 游戏 “野球 大 战 ? 
中 “太空 人 ”一 个 动 节 扔 诈 弹 ,儿童 操纵 着 的 飞机 一 方面 要 
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想 办 法 “躲避 ”炸弹 ,一 方面 要 有 效 地 述 计 , 从 而 锻炼 了 和 孩子 
的 反应 能 力 。 , 低 幼儿 童 观察 感知 事物 时 ,; 往往 比较 笼统 、 
模 灶 ， 又 易 被 新 绪 的 、 非 重 虑 的 方面 所 吸引 ， 离 开 了 观察 四 
的 ， 通 过 操作 中 华 学 习 机 能 够 逐步 纠正 上 述 这 些 毛 病 。 


8 .中华 学 习 机 能 使 儿童 提高 注意 力 


注意 ， 就 是 心理 活动 对 于 一 定 事物 的 指向 和 集中 ， 它 是 
保证 人 们 心理 活动 清晰 ， 全 面 地 反映 事物 ， 提 高 工作 的 效率 
和 正确 性 的 必要 条 件 。 

注意 力 稳定 性 〈 也 就 是 持久 性 ) 的 培养 对 幼儿 来 说 是 非 
常 重要 的 ， 一 些 学 习 成 绩 不 理想 的 学 生 ， 往 往 注意 力 不 够 集 
中 ， 上 课 心 下 在 钼 ， 而 注意 力 强 的 孩子 能 在 相当 长 的 时 间 内 
连续 保持 注意 力 。 一 般 情况 下 , 获 岁 的 此 童 可 以 连续 注意 10 一 
15 分 钟 ， 十 一 二 岁 的 孩子 能 保持 注意 力 30 一 加 0 分钟 5 

中 华 学 习 机 以 它 动态 的 画面 能 够 引起 儿童 的 注意 ， 容 易 
引起 他 们 的 兴趣 ， 在 学 习 和 娱乐 中 不 断 强化 注意 力 a 

另外 ， 中 华 学 习 机 可 以 采取 多 种 方式 ,灵活 地 讲授 知识 ， 
明白 易 懂 ;; 生动 有 趣 ， 孩 子 们 兴趣 提高 了 ， 注 意 力也 就 集中 


9. 中 华 学 习 机 能 使 儿童 提高 记忆 力 


记忆 ， 是 过 去 的 感知 和 经 验 在 人 脑 中 的 反映 。 人 类 如 果 
没有 记忆 ,将 永远 处 于 新 生 儿 状态 。 

中 华 学 习 机 可 以 帮助 儿 章 在 形象 记忆 的 基础 上 加 强 和 所 
ee 18 。 


离 抽象 记忆 。 

比 旭 ， 小 学 数学 中 的 行程 问题 ， 速 度 = 距 离 二 时 间 ， 郑 
只 进行 抽象 讲解 ， 孩 子 们 不 容易 记 住 这 个 公式 ， 中 华 学 习 宙 
可 以 图 形 动态 演示 ， 屏 幕 上 可 以 在 不 同上 距离 和 不 同时 间 条 件 
下 ， 出 现 不 同 速度 的 小 汽车 ， 孩 子 们 逐步 加 深 对 行程 问题 的 
理解 ， 从 而 通过 形象 记忆 过 湾 到 抽象 记忆 。 让 华 学 习 机 很 方 
便 地 就 为 儿童 创造 了 这 个 记忆 的 条 件 。 

记忆 的 过 程 可 分 为 识 记 一 一 再 识 和 回忆 一 一 保持 ， 记 
忆 是 个 复杂 的 心理 过 程 ， 如 何 保持 记忆 呢 ? 需要 及 时 复习 ， 
反复 回忆 , 采用 多 料 化 的 复习 方式 。 中 华 学 习 机 恰恰 可 以 给 
我 们 提供 这 样 的 方便 。 只 要 将 软件 设计 成 能 够 反复 多 禅 地 提 
出 问题 ， 便 可 帮助 孩子 们 进行 复习 ， 保 持 记忆 。 


10 ,中 华 学 习 机 能 使 儿童 提高 想象 力 


想象 是 幼儿 创造 能 力 的 起 点 。 文 艺 复兴 时 期 的 伟大 画家 、 
科学 家 达 。 劳 奇 说 过 ， 他 在 幼年 时 总 觉得 家 里 墙壁 上 的 污 迹 
和 裂纹 就 象 是 魔女 在 飞舞 ， 就 象 是 奇形怪状 的 动物 在 烙 斗 一 
样 。 

列 字 指出， 幻想 是 可 贵 的 品质 ， 积 极 的 幻想 不 久 是 儿童 
学 习 的 动力 ， 而 且 对 平 他 们 精神 面 狐 和 道德 品质 的 形成 均 起 
著 重 要 作用 。 

中 华 学 习 机 的 LOGO 语 膏 ( 以 后 章节 要 讲 到 ) 就 能 帮助 孩 
子 们 支 提高 想象 力 .LOGO 语 宽 绘 图 功能 很 强 , 通过 简单 的 语 
法 学 习 ， 孩 子 们 便 可 以 操纵 一 个 称 为 “海龟 ”的 作 图 装置 在 
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屏幕 上 绘制 ,拼装 和 组 成 各 种 图 形 , 使 图 形 旋转 变换 ， 甚 至 可 
以 使 图 形 运 动 ， 任何 一 种 新 的 起 法， 上 几乎 都 能 产生 一 种 奇妙 
的 图 形 ,， 这 样 ， 孩 子 的 想象 力 和 创造 欲 便 会 油 然而 从。 


11 ,中 华 学 习 灿 能 使 儿 意 提 高 思 纺 能 力 


韦 维 是 通过 对 事物 分 析 、 比 绞 、 抽 象 、 缘 合 与 概括 的 过 
程 ， 是 认识 事物 的 本 质 和 规律 的 活动 

要 培养 孩子 的 思维 能 力 ， 首 先 要 创造 出 使 他 积极 嘎 维 的 
环境 ， 提 出 他 们 感 兴趣 的 问题 ， 激 发 起 解决 问题 的 概 望 二 从 
而 使 孩子 开 扩 思路 ， 促 使 思维 的 发 展 。 中 华 学 习 机 能 够 提供 
这 种 方法 和 手段 。 人 一 机 对 话 的 方式 促使 孩子 经 常 处 于 积 极 
思维 状态 。 

从 孩子 思维 发 展 过 程 来 看 ， 一 般 3 ~ 7 岁 的 孩子 处 于 形 
象 思维 阶段 ， 他 们 往往 符 助 于 事物 的 具体 形 每 进行 思维 。 小 
学 阶段 的 此 童 ， 处 于 从 形象 思维 向 抽象 思维 发 展 的 转变 时 
期 , 随 着 年 龄 ,见识 的 增长 * 逐 步 学 会 通过 抽 笋 的 概念 ,进行 扒 
理 、 判 断 。 到 了 予 青 年 期 往往 抽象 思维 便 占 据 簿 主导 地 位 。 

儿童 开始 接受 的 概念 都 是 具体 的 概念 。 比 如 一 只 小 狗 、 
三 只 小 免 每 ,逐步 过 渡 到 能 够 概括 出 这 些 其 体 的 实物 有 些 什 
么 特性 ， 从 而 进行 分 类 区别。 如 小 狗 和 人 小 免 都 是 动物 ， 他 
们 的 不 同 点 是 耳 基 不 一 祥 长 等 等 。 通 过 屏幕 上 画面 的 比较 逐 
步子 解 事物 的 本 质 和 特征 。 

此 童 开 始 接受 的 概念 是 弧 立 的 ， 而 中 华 学习 机 可 以 培养 
孩子 但 分 析 和 了 解 事物 之 间 的 联系 。 如 中 华 学 习 机 的 LOGO 
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看 言 ， 就 可 以 促使 孩子 将 事物 联系 起 来 考虑 ， 即 孩子 可 以 先 
在 屏幕 上 画 一 个 正方 形 ， 然 后 再 画 一 个 三 角形 ， 这 两 个 图 形 
是 分 离 的 。 旭 时 把 三 角形 放 在 正方 形 上 面 不 就 变 成 一 座 小 房 
子 了 吗 ( 图 1 一 2)? 如 果 再 复杂 一 些 ， 画 两 个 大 小 不 同 的 长 方 
彩 和 两 个 回 ， 看 孩子 们 能 不 能 组 成 一 辆 汽车 〈 图 1 一 3 ) 。 开 
有 孩子 可 能 装 得 不 对 ， 但 在 家 长 的 鼓励 启发 下 ， 一 定 能 完成 
这 一 组 合 。 


二 2 图 1 一 3 
在 开发 儿童 思维 能 力 时 要 注意 培养 结构 思维 观念 ， 发 展 
新 的 思想 方法 。 结 构 是 指 某 一 系统 的 各 个 要 素 的 结合 方式 或 
组 合 方式 ， 任 何 系统 都 是 按 一 定 结构 组 成 的 整体 。 
结构 化 思维 是 这 样 一 种 过 程 ， 把 比较 复杂 的 问题 分 解 成 
若干 较 小 的 和 容易 解决 的 问题 来 解决 ， 然 后 在 此 基础 上 综合 
得 出 原来 复杂 问题 的 解决 方法 。 
系统 化 思维 观点 认为 一 切 物 体 都 是 一 个 整体 系统 ， 现 实 
物质 世界 的 一 切 事 物 都 是 以 系统 方式 存在 发 展 的 ， 并 且 每 个 
系统 都 与 环境 和 不断 进 行 物 质 与 能 量 交 换 ， 即 对 外 开放 型 ， 系 
统 内 部 是 投 层 次 等 级 有 机 联系 起 来 的 ， 即 对 内 层次 型 。 
。2]1 。 


这 两 种 新 型 的 思维 方式 ， 从 幼儿 时 期 家 长 就 要 有 意识 地 
进行 培养 。 而 利用 中 华 学 习 机 的 LOGO 语 言 就 可 以 培养 孩子 
们 的 结构 化 思维 方式 。 

对 于 系统 化 思维 方式 的 培养 是 需要 多 方面 的 实 牙 和 银 
炼 。 程 序 设 计 本 身 就 是 一 个 理想 的 实践 过 程 。 要 想 设 计 出 一 
个 完美 的 程序 ,必须 首先 整体 构思 ,系统 地 考虑 设计 对 象 的 物 
理 模式 ， 决 定 程序 的 结构 和 流程 一 一 这 些 都 要 树立 系统 的 观 
点 。 作 为 系统 内 赂 ， 又 要 分 成 不 同 的 层次 ， 程序 处 理 起 求 也 
必须 按 层次 做 出 相应 的 区 分 。 因 此 ,通过 对 程序 结构 的 安排 和 
对 纵横 交错 的 子 程序 的 分 析 ， 会 使 孩子 受到 层次 化 思维 的 训 


练 。 
12 .中 华 学 习 机 能 使 儿童 提高 操作 能 力 


俗话 说 “心灵 手巧 ”。 看 来 心灵 和 手巧 密切 相关 。 儿 童 
的 操作 能 力 对 于 智 方 的 发 展 有 很 大 的 促进 作用 。 使 用 中 华 学 
习 机 离 不 开动 手 操作 ， 特 别 是 玩 电 子 游戏 时 ,要 想 取得 胜利 ， 
必须 按键 时 机 准确 .迅速 ,果断 ， 这 时 必需 手 脑 并 用 ， 思 维和 
动作 协调 。 实 践 证 明 ， 经 过 一 段 时 间 的 训练 ， 孩 子 的 反应 能 
力 会 增强 。 

中 华 学 习 杭 雏 盘 是 按照 标准 英文 打字 机 键盘 的 键 位 排列 
的 ， 从 小 掌握 正确 的 键盘 操作 要 领 ， 锻 炼 打字 手法 ， 对 提高 
打字 速度 是 非常 必要 的 。 现 在 的 小 学 生 ， 等 他 们 长 大 时 ， 我 
国 的 计算 机 使 用 已 经 少 当 普及 ， 每 个 人 都 有 相当 多 的 工作 要 
在 键 若 上 做 ， 学 好 中 华 学 习 机 的 键盘 操作 ， 除 了 有 利于 智力 
?22 。， 


发 展 之 外 ， 还 掌握 了 打字 这 门 技 衣 。 


四 、 怎 禅 浊 用 中 华 学 习 宙 和 更 高 效 地 
开发 儿童 智力 


13 . 粮 据 不 同 孩 子 的 特点 确定 学习 内 容 及 选择 食 适 的 软 
件 


片 董 智力 的 发 展 有 明显 的 差别 ， 即 有 的 智力 显露 较 早 ， 
而 有 的 儿童 发 育 较 晚 。 虽 扎 特 在 他 父亲 的 指导 下 3 岁 就 写 出 
了 《 小 步 舞 曲 》。 而 爱 因 斯 坦 4 岁 才 会 说 话 ， 7 岁 才 会 念书 ， 
但 他 们 都 成 为 出 类 拔 薪 的 人 物 。 关 键 是 要 因 才 施 教 。 所 以 ， 
在 本 书 的 学 习 过 程 中 ,针对 不 同 儿童 的 智力 水 平和 特点 ,要 选 
学 相应 的 章节。 一 般 来 说 ,年 龄 较 小 的 孩子 先 学 “海龟 作 图 鸣 
而 青少年 可 以 学 一 些 程序 设计 ， 对 于 学 习 较 为 吃力 、 时 间 较 
紧迫 的 学 生 , 可 以 直接 学 会 使 用 数学 辅助 软件 ,这 对 学 习 成 缚 
的 提高 有 一 定 帮 助 。 这 只 是 对 一 般 情 况 而 言 ， 老 师 和 家 长 可 
以 根据 孩子 的 情况 安排 学 习 计 划 。 

儿童 智力 的 差异 不 仅 表现 在 智力 水 平 的 高 低 不 同 ， 而 且 
表现 为 智力 活动 的 类 型 不 同 。 如 有 的 儿童 思维 中 形象 因素 占 
优势 ， 有 的 儿童 抽象 的 概念 和 逻辑 联系 占 优 势 ， 前 者 属于 形 
象 思 维 型 ,而 后 者 属于 逻辑 思维 型 ,对 于 前 者 和 后 考 采 用 的 学 
习 内 容 应 有 所 区 唱 。 

要 充分 发 挥 中 华 学 习 机 的 功能 ， 必 须 有 相应 的 软件 来 支 
圣 。 开 发 儿童 智力 更 要 注意 选择 好 合适 的 软件 ,如 果 选 择 不 当 
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会 影 啊 孩 子 的 兴趣 ， 起 不 到 开发 智力 的 作用 。 

选 购 的 软件 一 定 要 能 在 中 华 学 习 机 上 运行 :软件 的 难 易 
程度 要 适合 孩子 的 年 龄 和 智力 水 平 ， 教 学 软件 的 内 容 应 符合 
孩子 使 用 的 教 课 书 ， 等 等 。 

目前 ， 我 国 开 发 儿童 智力 方面 的 软件 还 不 丰富， 为 了 适 
合 目 己 孩 子 的 特点 ， 老 师 和 家 长 需要 亲自 编写 一 些 程 序 ， 这 
样 效果 往往 更 佳 。 比 如 ， 我 们 可 以 用 LOGO 语 言 编 一 些 适 合 
三 四 岁 孩 子 使 用 的 程序 ， 让 他 们 可 以 凭借 自己 的 直觉 和 感受 
来 操作 画图 (人 参考 “第 三 章 ， 六” ) 。 还 可 以 用 BASIC 语 
言 编写 程序 ， 让 孩子 和 学 习 机 对 话 ， 当 屏幕 上 出 现 孩 子 名 字 
时 ， 他 一 定 会 倍 感 亲切 ， 增 加 学 习 欲 望 (参看 “第 四 章 


一 ” ) 


14. 兴 趣 一 一 欲望 一 一 持之以恒 


最 近 , 磁 到 这 样 一 件 事 :一 对 年 轻 父 母 省 吃 俭 用 给 孩子 买 
了 架 钢 琴 ， 并 高 夯 聘 请 了 教师 ,但 孩子 喘 着 六 着 不 愿意 学 ,每 
次 老师 来 讲课 ,都 要 靠 父 母 软硬兼施 才能 坐 到 琴 膏 上 ,每 天 练 
琴 也 要 您 父 母 强迫 ， 有 一 天 , 趁 家 人 不 注意 ,孩子 用 菜刀 砍 坏 
了 雁 键 ,这 是 为 什么 呢 ? 因为 孩子 产生 了 逆反 心理 。 由 此 可 以 
看 出 ， 在 教 与 学 这 两 方面 ， 首 先 学 生 可 有 兴趣 ,有 要 求 ,有 和 欲 
望 。 我 国 古代 教育 家 孔子 就 强调 调动 学 生 的 积极 性 ， 他 说 
“不 避 不 启 ， 不 殿 不 发 ”， 意 思 是 讲授 要 掌握 时 机 ， 等 学 生 
“ 愤 ”“ 剧 ” 之 时 ， 即 有 人 迫切 的 求知 欲望 时 ， 才 能 施 教 。 

如 果 和 孩子 不 愿意 学 怎么 办 呢 ? 
e。24。 


日本 铃 本 镇 一 先生 创办 了 “小 提琴 教室 ”， 入 学 学 拉 小 
提 雁 的 是 两 三 岁 的 孩子 ， 这 些 孩 子 有 的 也 是 被 母亲 硬 搁 来 学 
琴 的 ， 他 们 对 小 提琴 并 不 感 兴趣 ， 来 到 之 后 ， 东 张 西 望 ， 甚 
至 到 处 乱 跑 ， 铃 木 先生 并 不 急于 教 他 们 拉 小 提琴 ， 故 意 不 给 
孩子 提琴 ， 而 是 先 教母 亲 拉 小 提琴 , 以 此 来 激发 他 们 的 兴趣 ， 
后 来 ,孩子 们 对 琴 产 生 了 兴趣 ,一 动不动 地 坐 在 那 里 看 那些 
和 自己 差不多 大 小 的 小 朋友 练 琴 ， 再 过 两 三 个 月 他 们 也 听 会 
了 一 些 曲 子 ， 非 常 想 亲 手 拉 一 拉 人 小提琴， 这 时 ， 铃 木 先生 还 
不 发 给 他 们 提琴 ， 直 到 他 们 实在 坐 不 住 了 ， 才 让 他 们 参加 训 
练 。 这 时 会 看 到 ， 一 旦 孩子 产生 了 浓厚 兴趣 ， 进 步 是 很 快 
的 。 所 以 说 兴趣 是 精通 的 基础 。 

我 们 的 家 长 ,老师 在 和 和 孩子 一 起 学 习 中 华 学 习 机 的 时 候 ， 
首先 要 让 孩子 对 学习 机 感 兴趣 。 比 如 让 他 们 看 看 中 华 学 习 
机 在 运行 一 些 有 趣 的 软件 时 ， 产 生 的 画面 和 特殊 效果 等 ， 从 
而 激发 起 他 们 的 学 习 欲 望 。 

在 学 习 中 华 学 习 机 的 过 程 中 ， 从 某 种 意义 上 讲 老 师 和 家 
长 的 主要 任务 是 激发 孩子 的 学 习 兴 趣 与 欲望 。 即 要 创造 条 
性， 不 断 提 出 新 的 问题 ， 调 动 孩子 积极 主动 去 学 ， 从 而 达到 
持久 以 便 。 


15 .车 孩 子 自身 的 力量 走 到 目的 地 


在 我 们 辅导 孩子 学 习 中 华 学 习 机 时 ， 一 定 要 注意 发 挥 孩 
子 的 主观 能 动 性 。 因 为 只 有 当 他 们 积极 思维 、 大 胆 实 践 和 在 
经 历 失败 与 胜利 的 过 程 中 ， 智 力 才 得 到 提高 。 所 以 ， 靠 孩子 
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自 册 的 力量 达到 目的 地 一 一 -是 最 好 的 辅导 方法 。 

我 们 和 和 孩子 一 起 操作 中 华 学 习 机 时 ， 最 好 将 自己 也 看 作 
是 一 名 初学 者 ， 和 和 孩 拉 一 起 商量 、 深 索 ， 并 且 要 注意 观察 防 
子 有 什么 特殊 的 困难 ， 以 及 他 们 擅长 什么 、 喜 欢 什么 ， 这 样 
帮助 他 们 就 会 有 的 放 矢 。 在 肯定 他 们 正确 的 部 分 时 ， 表 扬 不 
要 过 分 ， 比 如 你 说 ，“ 你 真是 个 了 不 起 的 孩子 ! ”“ 你 真是 
个 天 才 ! ”这 样 效果 并 不 见得 好 ， 明 智 的 孩子 会 感到 言 过 其 
实 ， 很 不 舒服 ， 年 龄 小 的 孩子 会 盲目 得 意 ， 撒 娇 。 我 们 表扬 
要 掌握 分 寸 ， 主 要 表扬 正确 的 做 法 而 不 是 他 本 人 。 

对 孩子 错误 的 部 分 ， 要 用 商量 的 口气 和 实验 的 方法 加 以 
纠正 。 比 如 ， 你 可 以 说 ，“ 你 看 如 果 我 们 这 样 操作 是 不 是 会 
更 好 些 ? ”“ 你 能 这 样 操 作 吗 ? 试 试看 ! ”有 的 爸爸 妈妈 
“ 恨 铁 不 成 钢 ”， 采 用 气 极 败坏 的 态度 进行 训斥 ，“ 给 你 讲 
了 多 少 次 ， 还 不 会 ， 真 篆 ! ”这 样 做 会 使 孩子 心中 不 满 ， 或 
内 交 ， 或 愤怒 ， 或 仇恨 顶撞 ， 造 成 争执 ， 大 吵 大 冰 ， 引 起 一 
系列 不 良 反 映 。 和 孩子 和 父母 都 不 高 兴 ， 影 响 孩 子 的 积极 性 。 

另外 ， 我 们 在 辅导 孩子 学 习 中 华 学 习 机 时 ， 不 要 包办 代 
等 ， 该 孩子 操作 的 一 定 要 他 自己 干 ， 有 时 应 该 故意 走 开 ， 让 
孩子 独立 操作 ， 使 他 有 个 自由 探索 的 机 会 ,使 学 习 更 加 主动 ， 
在 孩子 进行 运算 或 画图 时 ， 不 可 避免 地 会 出 现 错误 或 不 妥 ， 
这 时 ， 学 习 机 会 马上 出 现 反馈 信息 。 例 如 , 当 运 筑 答案 不 对 、 
命令 的 格式 不 符合 内 定 、 画 图 设置 的 尺寸 不 合理 时 ， 学 习 机 
会 告诉 你 : “答案 不 对 ， 是 否 要 重 作 ?? 或 者 提示 错误 的 类 别 ， 
这 时 孩 守 会 很 乐意 地 检查 自己 的 疏忽 和 错误 , 想 办 法 纠正 。 这 
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比 老师 或 家 长 去 挑 错 ， 纠 正 效 果 要 好 得 多 。 

传统 的 教育 方法 往往 是 过 份 追求 尽 少 出 现 错误 ， 并 在 实 
际 出 现 错误 时 又 忘记 把 它们 当 作 学 习 的 机 会 来 对 待 。 希 望 家 
长 和 老师 在 辅导 孩子 时 要 注意 纠正 这 种 做 法 ， 采 用 与 学 习 机 

相 适 应 的 新 的 教育 方法 ,充分 利用 学 习 机 能 迅速 反馈 的 优点 ， 

给 孩子 以 独立 发 现 并 纠正 错误 的 机 会 。 

总 之 ， 在 学 习 的 过 程 中 ， 尽 量 调动 孩子 的 内 因 ， 让 孩子 
靠 自身 的 力量 走 到 目的 地 。 


16 .智力 因素 与 韭 智力 因 索 


非 智力 因素 是 指 人 的 感情 、 意 志 、 性 格 ， 如 自信 心 、 成 
就 心理 、 力 争 意识 、 心 理 承 受 能 力 等 。 

事实 告诉 我 们 ， 有 的 人 智力 条 件 很 好 ， 常 常 由 于 非 智 力 
因素 的 影响 ， 智 力 得 不 到 发 展 ， 而 不 能 取得 什么 成 绩 。 

国外 ， 有 人 对 一 千 多 名 超常 儿童 追 综 研究 了 30 年 之 后 ， 
得 出 一 条 结论 ， 智 力 和 成 绩 之 问 绝 不 是 完全 相关 的 ，20 狗 成 
就 最 大 的 与 20 狗 成 就 最 小 的 相 比 较 ， 最 明显 的 盖 别 是 这 两 部 
分 人 个 性 、 意 志 、 品 质 不 同 ， 前 者 自信 ， 有 进取 心 、 不 屈 不 
挠 ， 能 坚持 到 最 后 完成 任务 ， 而 后 考 却 恰恰 缺少 这 些 品 

有 人 对 我 国 科技 大 学 84。85 必 少年 班 的 74 名 优秀 少年 大 
学 生 (平均 15.5 岁 ) 和 华东 师 大 某 系 83 届 85 名 普通 大 学 生 
《平均 年 龄 19 岁 ) 进行 的 一 次 测试 和 比较 发 现 ， 少 年 班 大 学 
生 比 蓝 通 大 学 生 在 人 个性、 心理、 品质 方面 ， 有 明显 优势 ， 他 
们 持 强 好 胜 ， 不 甘 落 后 ， 独 立 果断 ， 比 普通 大 学 生 更 有 耐力 
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和 和 韧性 〈 看 起 书 来 可 一 连坐 儿 个 小 时 不 受 外 界 千 扰 ) ,求知 谷 
强 。 特 别 是 少年 班 的 优秀 女 大 学 生 比 普通 女 大 学 生 怀 括 性 
少 ， 紧 张 性 小 ， 自 信心 强 。 所 以 说 ， 发 展 智力 不 是 孤立 的 ， 
必须 同 培养 良好 的 非 智力 因素 相 结合 。 

鉴于 我 国 独生子 女 的 现状 ， 目 前 培养 他 们 的 非 智力 因素 
更 是 非常 必要 。 一 些 孩 子 自 信心 差 、 胆 性 害 着 ， 有 的 意志 浅 
弱 、 动 播 不 定 ， 有 的 不 能 吃苦 、 害 怕 困 难 、 学 习 兴致 不 高 。 
所 以 ， 我 们 在 辅导 孩子 学 习 时 ， 要 注重 培养 非 智力 因素 ， 克 
服 他 们 的 心理 障碍 。 

孩子 的 可 塑性 大 ， 如 果 我 们 引导 和 教育 方法 得 当 ， 他 们 
的 心理 障碍 是 不 难 克服 的 。 比 如 ， 对 于 自信 心 差 的 孩子 ， 我 
们 要 鼓励 他 在 实际 活动 中 取得 成 功 ， 以 此 增强 自信 心 。 对 于 
意志 薄弱 的 ， 要 鼓励 他 们 克服 困难 ， 树 立信 心 。 人 的 意志 
是 在 克服 困难 中 锻炼 出 来 的 ， 中 外 有 成 就 的 人 物 都 是 在 克服 
重重 困难 的 逆境 中 成 长 起 来 的 。 我 们 不 要 为 孩子 将 一 切 都 准 
备 得 停 停 当 当 ， 要 给 他 们 留 有 克服 困难 的 机 会 ,使 那些 胆 小 、 
孤僻 、 优 柔 寡 断 的 孩子 受到 锻炼 ， 要 能 及 时 发 现 他 们 的 微 
小 进步 ， 并 给 于 肯定 ， 帮 助 他 们 树立 自信 心 和 克 服 困难 的 勇 
气 。 

我 们 要 为 孩子 创造 一 个 有 利于 培养 良好 性 格 的 环境 ， 不 
仅 是 自然 环境 ， 主 要 是 社会 环境 ， 让 孩子 在 愉快 、 民 主 的 气 
氛 中 不 断 提高 非 智 力 因素 。 中 华 学习 机 对 此 是 可 以 起 到 积极 
作用 的 。 老 师 和 家 长 要 抓 住 有 利 条 件 和 有 利 时 机 ， 尽 量 做 到 
自觉 地 培养 孩子 的 非 智力 因素 。 
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开发 儿童 的 智力 取决 于 多 方面 的 因素 ， 包 括 先 天 的 影 
响 、 后 天 的 教育 ， 和 孩子 个 体 的 特殊 性 ， 社 会 、 家 庭 、 学 校 所 
起 的 作用 ， 还 有 儿童 实践 的 深度 和 广度 ， 个 人 主观 能 动 性 发 
挥 的 程度 等 等 。 中 华 学 习 机 对 于 开发 儿童 的 智力 能 够 起 到 一 
些 作 用 。 利 用 得 好 ， 作 用 会 大 些 。 但 是 ， 要 有 效 地 开发 儿童 
智力 应 从 多 方面 努力 ， 不 断 地 探索 ， 其 中 也 包括 更 广泛 地 利 
用 中 华 学 习 机 开发 儿童 智力 这 一 新 的 课题 。 
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17 . 像 学 会 使 用 收录 机 一 梯 简 单 


目前 ， 不 少 人 一 提 到 计算 机 ， 就 感到 高 深 英 测 ， 不 赦 问 
津 。 其 实 ， 学 会 使 用 中 华 学 习 机 非常 简单 ， 诡 像 学 习 使 用 收 
录 机 一 样 ， 中 华 学 习 机 和 其 它 先进 设备 一 逢 ， 学 会 基本 的 操 
作 ， 达 到 能 够 使 用 的 目的 是 很 容易 的 。 

对 于 大 多 数 人 来 讲 ， 购 置 中 华 学 习 机 不 是 为 了 培养 软件 
程序 员 或 者 其 他 计算 机 专业 人 员 ， 而 是 为 了 使 用 现成 的 软件 
来 达到 某 种 特定 的 目的 。 

本 章 正 是 为 了 溃 足 这 些 使 用 阁 的 要 求 ， 精 选 最 基本 的 ， 
也 是 必须 掌握 的 操作 方法 ， 使 工作 繁 亿 的 爸爸 妈妈 们 只 要 花 
一 个 小 时 ， 就 能 与 孩子 一 起 享受 电子 游戏 的 乐趣 ， 使 功课 党 
重 的 学 生花 一 个 小 时 ， 就 能 请 到 一 位 耐心 的 “电子 教师 ” ， 
为 他 辅导 功课 。 对 于 希望 系统 掌握 中 华 学 习 机 使 用 的 同志 ， 
可 参阅 第 五 章 。 
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18 .党 会 合用 中 华 尝 习 机 玩 电子 游戏 


目前 ， 有 许多 游戏 软件 能 够 在 中 华 学 习 机 上 运行 ， 其 中 
类 岁数 都 能 存 迪 在 录音 机 的 磁带 上 。 也 就 是 说 ， 录 音 机 在 这 
用 作为 外 存 贮 器 。 本 
节 的 目的 就 是 要 学 会 使 
用 具有 主机 、 家 用 PAL 
制式 彩色 或 黑 所 电视 机 
及 录音 视 组 成 的 中 华 学 
习 宙 系统 《图 2-1)， 党 
晨 基本 近 作 方法 。 现 在 
饼 游 戏 软 件 为 例 叙 述 。 2 

(1) 将 系统 安装 起 来 图 2-1 

打开 中 华 学 习 机 主机 机 箱 ， 小 心地 取出 主机 ， 同 时 取出 
区 频 电 缆 和 录音 机 电缆 。 

人 主机 ， 主 机 外 壳 右 上 角 有 一 个 电源 指示 灯 ， 前 兴 部 是 
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键盘 ， 机 壳 内 有 主 电路 板 、 各 种 揪 件 、 电 源 、 扬 声 器 等 。 

加 主机 与 显示 器 的 连接 ， 显 示 器 可 以 是 电视 机 (PAL-D 
制式 彩色 或 黑白 的 ) ， 也 可 以 是 监视 器 (PAL-D 制 式 单 色 或 
彩色 的 ) 。 由 于 二 者 与 主机 之 间 连 接 的 播 口 不 同 ， 要 引起 注 
意 ， 以 免 接 错 。 

A .电视 机 与 主机 相连 ， 如 图 2-2 把 电视 机 的 天 线 揪 头 氢 
掉 ， 用 视频 电缆 线 一 头 插入 主机 后 座 标 有 电视 机 (TV) 的 儿 
孔 ， 一 头 插 入 电视 机 天 线 插 孔 ， 将 电视 机 电源 插头 与 主机 电 
源 插头 分 别 插入 电源 插座 〈220V 交 流 市 电 ) ， 先 打开 电视 机 
电源 开关 ， 再 打开 主机 电源 开关 ， 调 整 电视 机 频道 〈 一 般 在 
3 或 4 频道 ) ， 直 到 屏幕 上 清晰 地 显示 出 “ZHONG HUA 
XUE XI JI” 字 样 为 止 。 至 此 主机 与 电视 机 接线 完毕 。 


了 .主机 与 监视 器 相连 ， 如 图 2-3， 用 视频 电缆 线 一 头 揪 
入 主机 座 后 监视 器 接口 ， 一 头 插入 监视 器 IN 揪 座 ， 将 主机 
与 监视 器 电源 的 插头 分 别 插入 电源 插座 ， 先 开 监视 器 电源 丈 
ea 32 。 


兰 , 再 开 主 机 电源 开关 ,屏幕 上 将 出 现 清晰 “ZHONG 了 UNA 
XUE XI JI” 字样， 至此， 主机 与 监视 器 接线 完毕 。 
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图 主机 与 录音 机 连接 ， 如 图 2-4, 将 录音 机 电缆 线 的 一 端 
五 芯 捅 头 揪 入 主机 侧面 的 录音 机 接口 ， 另 一 端的 两 个 3 .5mam 
捅 头 分 别 搬入 录音 机 下 AR 揪 孔 和 MIC 揪 孔 。 

这 禅 系统 便 安 装 起 来 了 。 

(2) 熟悉 一 下 键盘 

为 了 能 操纵 中 华 学 习 机 做 游戏 ， 需 要 大 致 熟悉 一 下 键 
基 ， 找 到 26 个 英文 字母 、10 个 (0 一 9) 数 字 键 和 符号 键 的 大 至 
位 置 〈 至 于 一 些 特殊 的 键 ， 如 果 用 到 ， 可 以 查阅 第 五 章 的 内 
容 )。 

《3) 开机 居 动 

先 打 天 电视 机 (或 显示 器 ) 电源 开关 ， 再 打开 主机 电源 
开关 《在 主机 的 左 后 方 ) ， 立 刻 会 听 到 “ 哪 ” 的 一 声 ， 这 说 
明 主 机 已 经 准备 好 ， 同 时 键盘 左上 方 的 指示 条 发 亮 ， 显 示 屏 
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上 有 一 个 闪烁 的 小 方块 ， 称 为 光标 ，“]” 是 BASIC 语言 系 
统 提示 符 。 

(4) 将 存 贮 在 磁带 上 的 游戏 软件 装 入 主机 内 存 

要 想 在 中 华 学 习 机 主机 上 运行 磁带 上 的 游戏 软件 ， 必 须 
先 将 它 闭 入 主机 壳 内 的 存 贮 器 。 请 按 以 下 步骤 操作 ， 将 半 有 
诲 戏 软件 的 录音 磁带 放 入 录音 机 里 〈 注意 不 要 放 反 ) ， 拒 磁 
带 倒 回 到 原 处 ， 这 时 在 主机 键盘 上 殴 入 PLAY 命令 (方法 是 
顺序 按 字 母 键 P.L.A、Y)。 在 录音 机 上 按 下 放 音 键 (PLAY 
健 )， 使 磁带 开始 转动 ， 然 后 在 主机 键盘 上 找 到 ETURN 1 
键 〈 它 在 键盘 右 部 ， 叫 回 车 键 ， 以 后 用 。/ 开 未 ), 按 下 。 这 时 
异 旬 上 的 光标 消失 ， 大 约 过 15 秒 钟 ， 出 现 “PELEASE 
WAITING 一 ”( 请 稍 等 ) 之 类 的 信息 。 当 游戏 软件 全 部 装 
入 内 存 后 ， 犀 幕 上 会 出 现 五 彩 绕 纷 的 游戏 画面 。 最 后 按 下 录 
音 机 的 STOP 键 〈 停 止 磁带 转动 ) 。 

(5) 开始 玩 游戏 

现在 就 可 以 作 
游戏 了 。 假 如 刚才 
我 们 调 入 主机 内 存 
的 游戏 软件 名 字 为 
“ 打 老 虎 ”， 这 
时 ， 电 视 机 屏幕 上 
便 会 出 现 这 祥 的 画面 ， 整个 屏幕 分 为 四 层 ， 层 与 层 之 间 有 几 
个 梯子 相连 ， 三 只 小 老虎 到 处 跑 来 跪 去， 屏幕 的 下 方 站 着 一 
个 小 人 。 操 作者 要 通过 键盘 使 小 人 妃 上 去 ， 把 老虎 打 死 。 钴 
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盘 上 因 键 使 小 人 向 上 跑 ， 轩 键 使 小 人 向 下 ， 团 键 使 小 人 向 
左 ， 图 键 使 小 人 向 有 。 通 过 按 这 四 个 键 控制 小 人 经 过 梯子 登 
上 和 楼层， 然后 选择 老虎 要 经 过 的 地 方 ， 用 空格 键 〈 键 肯 最 下 
方 的 长 键 ) 来 指挥 小 人 在 楼 板 上 挖 坑 ， 老 虎 一旦 掉 进 坊 里 ， 
再 次 按 空格 键 ， 小 人 便 会 将 老虎 打 死 ， 屏 幕 右上 方 记 分 处 便 
会 加 上 100 分 。 当 把 三 只 老虎 全 部 打 死 ， 这 一 局 取胜 ， 中 华 
学 习 机 便 会 演奏 一 段 优美 的 乐 秽 未 庆 费 胜利 ， 并 开始 新 的 一 
局 -一 老虎 增加 到 五 具 ， 以 后 还 会 继续 增加 ， 并 且 老虎 的 运 
动 速度 也 加 快 ， 而 小 人 的 速度 却 越 来 越 晶 ， 这 对 玩 游戏 者 
的 要 求 就 更 高 ， 兴 趣 会 更 浓 。 候 若 老 虎 返 上 了 小 人 ， 这 一 局 
便 会 以 失败 而 告 结 束 ， 要 重新 再 来 。 

这 只 是 游戏 软件 的 一 个 例子 ， 其 它 游戏 的 玩法 会 有 扬 不 
同 ， 可 以 从 游戏 磁带 附 有 的 说 明 电 了 解 如 何 操作 。 
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课堂 上 辅助 数学 ， 课 外 帮助 中 、 小 学 生 复 习 功 课 〈 充 当 
电子 教师 ?), 是 中 华 学 相机 主要 的 功能 之 一 。 目 前 这 方面 的 
软件 很 多 ， 只 要 学 会 使 用 这 些 软件 ， 便 可 以 有 助 于 我 们 的 教 
学 。 
教学 辅助 软件 乡 存 贮 在 软 磁 蕉 上 ， 当 然 ， 也 有 存 贮 在 录 
音 磁 带 上 的 ， 如 果 是 后 一 种 情况 ， 便 可 以 按照 上 一 节 “ 使 用 
中 华 学 习 机 玩 游戏 ”的 方法 去 进行 。 
软 键 盘 的 外 形 像 一 个 小 晶片， 封装 在 保护 套 内 ， 上 面 记 
录 了 大 量 的 信息 ， 其 中 包括 教学 辅助 软件 程序 。 要 使 用 教学 
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辅助 软件 ， 就 要 将 这 些 信息 装 进 主机 内 存 中 ， 这 些 工作 要 通 
过 软盘 驱动 器 来 完成 。 这 祥 ， 就 必须 在 原来 的 系统 ， 即 包括 
主机 、 显 示 器 〈 电视 机 ) 和 录音 机 的 基础 上 ， 增 加 软盘 驱动 
器 。 

这 一 节 就 是 要 通过 
学 会 使 用 存 贮 在 磁盘 上 
的 教学 辅助 软件 来 了 解 
具有 主机 、 显 示 器 〔 电 
视 机 ) 、 软 盘 驱 动 器 组 
成 的 中 华 学 习 机 系统 ， 
掌握 基本 的 操作 要 领 
(图 2-5) 。 

(1) 把 系统 安装 起 来 

上 一 节 已 经 讲 了 如 何 将 主机 和 显示 器 连 搂 起 来 ， 现 在 只 
要 讲 讲 如 何 把 主机 和 软盘 驱动 器 连接 起 来 就 行 了 。 

软盘 驱动 器 本 身 与 唱机 相似 ， 由 一 个 马达 带动 磁盘 转 
动 ， 机 上 有 一 个 磁头 可 以 读 取 磁盘 上 的 信息 。 

软盘 驱动 器 和 主机 之 间 的 连 线 方法 如 图 2-6。 它 们 之 间 
是 通过 20 线 扁平 电缆 线 相连 的 。 电 纱 的 一 端 插入 主机 后 驱动 
器 接口 ， 另 一 端 连 接 驱 动 器 ， 连 接 时 一 定 要 注意 ， 揪 针 和 播 
孔 必须 一 一 对 应 ， 即 电缆 线 两 端的 凸 起 部 分 都 朝 上 。 

(2) 开机 启动 与 软件 的 装 入 

系统 安装 好 后 ;就 要 开机 启动 了 ， 同 时 将 磁盘 上 的 教学 
辅助 软件 调 入 主机 内 存 并 且 运 行 。 
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首先 ， 打 开 软 盘 驱动 器 正面 的 一 个 小 盖 ， 将 教学 辅助 软 
件 磁 盘 印 字面 向 上 、 有 缺口 地 方向 里 轻 轻 地 搬入 驱动 器 ， 关 
上 驱动 器 门 盖 ， 然 后 依次 打开 显示 器 电源 开关 、 主 机 电源 开 
关 ， 这 时 会 看 到 驱动 器 上 指示 灯 发 亮 ， 并 且 可 以 听 到 驱动 器 
内 电机 材 动 的 声音 ， 当 驱动 器 指示 灯 熄 灭 后 ， 如 果 屏 幕 上 出 
现 教学 辅助 软件 的 画面 ， 如 标题 录 信 息 等 ， 说 明教 学 辅助 软 
件 已 经 从 磁盘 调 入 主机 内 存 了 并 且 开始 运行 ， 假 若 当 了 驱动器 
指示 灯 熄 灭 后 ， 屏 幕 上 出 现 如 下 信息 : 


一 -rmeerrrraezr 二 mrrrza 
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DOS VERSION 3.3 08125180 
APPLE I PLUS OR ROMCARD SYSTEM 
MASTER 

(LOADING INTEGER ANTO LANGUAGE 
CARD) 
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这 时 ， 我 们 可 以 从 键盘 上 键入 CATALOG -7 命令 ( 即 
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有 顺 次 键入 字母 键 C、A、T A、L、O、G 和 RETURN 
键 ) 。 这 是 一 条 “ 列 磁 盘 文 件 图 法” 的 命令 。 当 学 习 机 接受 
到 这 条 命令 之 后 ， 屏 幕 上 会 出 现 此 磁盘 上 所 有 文件 的 目录 ， 
在 列 出 的 这 些 文件 目录 中 ， 你 可 选择 出 准备 运行 的 教学 辅助 
软件 ， 然 后 在 键盘 上 键入 ; 

RUN 教学 软件 名 </ 

此 时 ， 教 学 辅助 次 件 的 画面 便 会 在 屏幕 上 出 现 了 ， 这 说 
明 此 教学 辅助 软件 已 经 从 磁盘 调 入 内 存 ， 并 且 开 始 运行 。 

(3) 使 用 教学 辅助 软件 

目前 ， 使 用 中 的 教学 辅助 软件 大 多 都 具有 直观 、 明 了 、 
使 用 方便 等 优点 ， 这 是 由 于 在 设计 这 类 软件 时 ， 对 每 一 操作 
步骤 都 安排 了 提示 信息 。 例 如 ， 在 程序 运行 开始 ， 屏 幕 上 一 
般 都 会 出 现 一 个 功能 表 ( 称 之 为 菜单 ) ， 供 使 用 者 根据 需要 
实现 的 功能 键入 相应 的 编号 ， 这 样 ， 即 使 没有 任何 计算 机 知 
识 的 人 ， 只 要 跟着 提示 信息 做 出 相应 的 回答 ， 便 可 以 一 步 步 
地 进行 下 去 。 

例如 ， 解 析 几 何 作 图 教学 辅助 软件 是 针对 高 中 数学 中 有 
关 解 析 几 何 作 图 的 几 个 难点 而 设计 制作 的 ， 可 以 帮助 教师 在 
讲课 时 画 出 复杂 的 轨迹 方程 图 ， 同 时 ， 也 帮助 学 生 形象 地 理 
解 由 于 参数 变化 所 引起 的 轨迹 的 变化 。 

这 个 软件 按 上 述 第 一 种 情况 开机 并 调 入 内 存 后 屏幕 上 出 
现 主 菜单 : 

人 @@ 任 意 方程 的 轨迹 图 

@@ 动 点 关于 点 的 轨迹 图 
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图 动 点 关于 已 知 线 的 轨迹 图 

@@ 动 点 关于 已 知 点 和 已 知 线 的 迹 轨 问 

@@ 动 点 关于 已 知 线 和 已 知 线 的 轨 迹 图 

@@ 点 关于 三 角 函 数 的 轨迹 图 

使 用 者 根据 需要 选择 其 中 的 一 种 功能 ， 从 键盘 上 键入 其 
编号 ， 如 键入 四 .1， 计 算 机 便 会 自动 进入 这 种 轨迹 的 作 图 状 
态 ， 然 后 会 继续 提示 让 你 输入 数据 、 符 号 等 。 你 具 要 按 提示 
操作 ， 便 可 以 一 步 步 地 实现 预定 的 各 种 功能 ， 包 括 将 画 出 的 
图 形 扩大 或 缩小 等 等 。 

落 学 辅助 软件 很 多 ， 我 们 不 能 一 一 列举 ， 只 要 掌握 基本 
操作 方法 ， 再 参照 使 用 说 明 ， 便 可 使 用 中 华 学 习 机 去 完成 教 
学 辅助 工作 了 
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在 海边 沙 锥 上 忠 行 的 海龟， 会 在 沙滩 上 留 下 各 式 各 样 的 
痕迹 。 而 我 们 这 里 的 海龟 却 是 计算 机 显示 屏幕 上 的 一 个 亮 三 
角 ， 我 们 利用 LOGO 语 言 提 供 的 各 种 命令 ， 能 使 它 在 屏幕 上 
留 下 各 种 各 术 的 图 形 。 

LOGO 语 言 是 计算 机 高 级 语言 家 庭 中 的 一 个 新 成 员 。 

LOGO 一 词 起 源 于 希腊 单词 ， 意 思 是 符号 ， 或 思考 ， 或 
想法 等 。 它 作为 一 种 高 级 语言 起 源 于 麻 省 理工 学 院 著名 的 人 
工 智 能 研究 中 心 ， 是 目前 计算 机 发 达 国 家 的 中 小 学 普遍 采 
用 的 语言 。 它 打破 了 过 去 传统 的 教学 方式 ,采用 启发 式 学 习 方 
法 循循善诱 地 引导 学 生 们 去 思考 。 不 但 小 学 生 ， 就 是 五 六 岁 
的 儿童 都 可 以 在 电脑 上 作 贷 有 风趣 的 游戏 一 一 赁 着 自己 的 想 
像 去 绘制 各 种 图 画 。 这 真 难以 想象 它 的 潜力 该 有 多 大 。 因 
而 ，LOGO 语 言 被 准 为 “电脑 教室 里 的 国王 ”。 

另外 ，LOGO 语 言 是 先进 的 结构 程序 设计 语言 。 这 样 ， 
不 仅 能 使 孩子 们 从 小 就 学 会 良好 的 程序 设计 技术 ， 为 以 后 的 
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学 习 打 好 基础 ， 而 且 还 可 以 培养 孩子 结构 化 思维 方法 。 

海龟 作 图 是 LOGO 语 言 的 一 部 分 。 这 一 部 分 内 容 简单 易 
学 ， 对 低 幼儿 童 非常 适宜 。 儿 童 不 仅 可 以 学 会 操纵 海龟 在 屏 
幕 上 绘制 和 “装配 ”各 种 图 形 ， 而 且 还 能 使 图 形 具 有 各 种 变 
幻 ， 甚 至 使 它 动 起 来 。 

因此 ， 在 学 习 这 部 分 内 容 时 ， 我 们 建议 家 长 和 孩子 一 起 
学 习 ， 放 开 手 ， 让 孩子 尽兴 地 “ 玩 " 海 龟 。 而 家 长 的 任务 是 事 
先 掌 握 这 部 分 内 容 ， 然 后 坐 在 孩子 旁边 ， 观 察 他 的 操作 ， 提 
一 些 建议 。 有 时 候 要 故意 让 他 独立 操作 一 会 ， 而 有 时 又 要 和 
孩子 共同 探讨 、 和 解决 问题 。 

总 之 ， 要 使 孩子 能 保持 极 大 的 兴趣 ， 展 开 想 像 的 翅膀 ， 
大 胆 地 创作 。 这 样 才能 在 学 习 程序 设计 的 过 程 中 达到 开发 智 
力 的 目的 。 


一 海龟 世界 


我 们 的 主角 一 一 海信 就 要 与 大 家 见面 了 。 本 章 的 目的 就 
是 通过 学 习 一 些 命令 使 海龟 移动 ,并 在 电视 碾 糙 上 绘画 作 图 。 

20 . 海 危 出 场 

中 华 学 习 机 已 经 将 LOGO 语言 固化 在 主机 电路 板 上 的 
只 读 存 贮 器 内 。 它 基本 具有 Terrapin 工 OCO 的 功能 .对 于 不 
同 的 机 器 配置 ， 可 以 采用 不 同 的 方法 将 LOGO 语言 调 出 。 

当 你 的 中 华 学 习 机 系统 只 配 有 主机 、 电 视 机 和 录音 栅 的 
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情况 下 ， 先 将 电视 机 和 录音 机 电源 打开 ， 再 打开 主机 电源 天 
关 ， 当 屏幕 左下 方 显 未 出 提示 符 “] ”时 ， 键 入 

]LG。y 

即 可 进入 LOGO 语 童 。 

当 你 的 中 华 学 习 机 配 有 软盘 驱动 器 的 情况 下 ， 首 先 将 标 
有 DOS3 .3 的 微 盘 搬入 软盘 驱动 器 。 注 意 在 搬入 弹 盘 时 要 将 
有 标签 一 面 朝 上 ， 缺 口 朝 里 。 关 上 驱动 器 门 柄 ， 然 后 依次 打 
开 电 视 机 和 主机 开关 ， 此 时 听 到 驱动 器 转动 的 声音 ， 几 分 钟 
后 ， 屏 幕 上 出 现 提示 符 和” 时 ， 键 入 ; 

]MAXFILES1 

]LOGO， 

便 会 出 现 以 下 版 面 , 

CHINESE EDUCATION 
COMPUTER 

ELG 

VERSION1.1 

1987 .6 

? 

其 中 “? ”是 LOGO 语 言 的 提示 
符 ， 至 此 已 将 LOGO 语 言 启动 图 5-1 

LOGO 语 言 可 以 指挥 一 个 叫做 海 凶 的 自动 装置 ， 通 过 命 
令 ， 让 它 在 屏幕 上 移动 ， 画 出 各 种 图 形 。 

好 ， 现 在 我 们 要 请 海龟 出 场 了 ! 

键入 ; 
42 。 


DRAW-/ 

此 时 整个 屏幕 栅 得 一 片 密 向 ， 只 有 中 央 有 一 个 小 也 有 ， 
这 就 是 押 亩 的 海鱼 ， 靠 近 底 部 有 一 个 问号 提示 符 。 这 意味 着 
LOGO 进 入 作 图 模式 。 这 时 屏幕 底部 保留 4 行 以 供 你 键入 的 命 
令 和 计算 机 作 回 答 时 用 。 屏 幕 的 其 余部 分 均 供 作 图 (图 3-1)。 

下 面 我 们 将 通过 不 同 的 命令 ,使 海龟 移动 画 出 各 种 图 形 。 


21 .让 海龟 画 出 正方 形 和 三 角形 
一 一 介绍 海龟 基本 命令 


上 一 划 海 龟 已 经 出 场 ， 它 的 原始 位 置 是 位 于 屏幕 的 中 
央 。 并 且 尖 凑 癌 上 《图 3-1 ) 。 

尖 头 方 癌 表示 海龟 的 前 进 方 四 。 

以 下 是 使 海龟 移 区 的 基本 命令 ， 


向 前 ，FORWARD 〈 缩 写 FD ) 参数 
加 后 ，BACK (缩写 BK ) 参数 


这 两 个 命令 是 让 海龟 向 前 或 者 问 后 移动 ， 阶 带 的 参数 是 
确定 海龟 前进 或 关 后 退 的 步 数 。 

整个 屏幕 左右 为 2850 步 ， 上 下 为 200 步 左右 ， 若 从 屏幕 的 
市 心 点 (0，0) 算 起 ,到 屏幕 最 左边 为 140 步 ,到 屏幕 最 右边 为 
139 步 ,到 最 上 边 为 101 步 左右 ,到 最 下 边 为 100 步 左右 ,例如 : 

FD 40 < ， 即 命令 海龟 向 前 40 步 〈 当然 在 键入 命 令 
以 后 ， 要 键入 加 车 键 ， 这 我 们 以 后 就 不 加 说 前 了) 。 

以 下 命令 是 使 海龟 左右 转动 的 命令 ; 

e。 43。 


向 左 ，LEFT (缩写 LT) “参数 


间 右 ，RIGHT 〈 负 号 RT ) 参数 


它们 附带 的 参数 是 确定 海 旬 转 动 的 角度 。 例如 ，LT 90 
即 命令 海龟 向 左 转 90 度 。 这 时 海龟 并 没有 走动 ， 只 是 从 原 
来 前 进 的 方向 向 左 转 了 90 度 ， 如 果 原 来 前 进 方向 为 向 上 ， 执 
行 此 语句 后 ， 海 龟 方 向 指向 正 左 方 〈 这 里 与 数学 上 的 规定 相 
同 ， 转 -- 周 为 360 度 ) 。 
现在 我 们 就 可 以 画 正方 形 了 。 观 察 行 键入 一 个 命令 后 ， 
海龟 的 移动 方向 和 距离 。 


FD 
RT 
FD 
有 民工 
上 FD 
R 工 
FED 
及 工 


90 


| 
DID 


图 35-2 


图 3-2 是 以 图 解 的 方式 来 描述 执行 过 程 ，a .前 进 50 步 ; 
b . 右 转 90 度 ,前 进 50 步 fd , 右 转 90 度 !，e. 前 进 50 步 ; 工 . 布 
转 90 度 ，g .前 进 50 步 上 . 右 转 90 度 〈( 回 到 起 始 位 置 ) 。 

我 们 不 难 用 同样 的 方法 画 出 等 边 三 角形 ; 


ED 


LT _ 120 


e 44。， 


60 


FD 60 
LT 120 
FD 60 


工 工 120 图 5-3 

确定 转动 的 角度 是 海龟 作 图 的 一 个 关键 问题 ， 在 这 里 转 
动 的 角度 是 相对 于 原来 的 方向 而 言 的 。 

从 上 面 两 个 图 形 的 作 图 过 程 中 ， 可 以 看 到 我 们 记 键 入 的 
命令 重复 很 多 ， 画 正方 形 时 ， 前 进 和 右 转 命令 重复 了 四 次 
画 三 角形 时 ， 前 进 和 左 转 的 命令 重复 了 三 次 ， 这样 做 有 些 太 
烦琐 了 。 用 “重复 ”命令 可 以 简化 这 些 操 作 。 

以 下 苹 重 虽 命 令 格 式 ; 

| 
REPEAT 参数 [5 命令 表 ] 

其 中 ， 人 参数 为 重复 次 数 ， 命 令 表 为 重复 的 内 容 (要 用 方 
括号 插 住 ) 。 

[【 例 ] REPEAT 4[FD 50 RT 90] 

即将 FD 50 RT 90 重复 执行 4 次 ;于 是 只 用 一 条 
语句 便 将 正方 形 画 了 出 来 。 

同 祥 画 三 角形 的 命令 也 可 以 用 一 条 命令 来 代替 ; 

REPEAT 3 [FD 60 LT 120] 

请 你 试 一 试 语 名 ， 

REPEAT 5 [FD 50 LT 72] 

会 作出 什么 图 形 。 
e 45 。 


根据 上 面 语句 ， 海 旬 画 出 一 个 如 


图 3-4 的 正 五 边 形 。 从 到 角形 、 正 广 
形 、 正 五 边 形 的 画 法 上 ， 我 们 是 否 看 ui 人 
到 了 一 个 规律 ， 海 匈 从 开始 指向 上 As 本 
方 ， 每 次 转动 一 定 角度 ， 最 后 又 回 到 - 
开始 的 方向 ， 共 转动 360 度 ， 我 们 用 上 34 
360 度 除 以 转动 的 次 数 就 得 到 了 转动 的 角度 ， 转 动 的 次 煞 ( 即 
重复 次 数 ) 是 所 画 多 边 形 的 边 将 。 
[ 例 ] REPEAT 10 [FD 30 RT 360/10] 
键入 此 命令 后 ， 屏 幕 上 的 海 旬 便 画 出 一 个 正 十 边 形 。 


22 ,让 海龟 按照 永 标 来 画图 


刚才 ， 我 们 用 前 、 后 、 左 、 右 四 个 命令 画 出 了 各 种 图 
形 ， 而 且 又 用 重复 命令 加 以 简化 。 但 是 ， 如 果 我 们 想 在 屏幕 
上 某 一 位 置 画 一 图 形 ， 或 者 将 海龟 移 至 屏幕 上 某 一 处 ， 就 要 
计算 出 行走 的 距离 和 转动 的 角度 ， 这 样 就 显得 格外 麻烦 。 如 
果 引 入 座 标 ， 问 题 就 会 变 得 简单 多 了 。 

(1) 设置 海 凶 的 位 置 

对 于 没有 学 过 座 标的 人 来 说 ， 要 知 间 屏 幕 上 的 一 个 点 就 
如 同 电影 院 里 的 某 一 个 座位 一 样 ， 是 由 排 、 座 号 来 确定 的 ， 
即 屏幕 上 的 每 一 点 是 用 一 组 顺序 的 煞 来 表示 的 。 屏 幕 上 的 应 
标 这 样 规 定 ， 通 过 屏幕 中 心 画 一 条 从 左 到 有 的 水 平 线 ， 这 条 
水 平 线 以 步 为 单位 标 上 刻度 ， 中 心虚 为 0 ， 向 右 为 正 值 ( 最 
大 为 189 步 ) ， 向 左 为 负 值 (最 小 为 -- 140)。 这 条 带 刻 度 的 有 
ae。 46 。 


方 亲 的 水 平 线 叫 X 轴 。 同 样 ， 通 过 中 心 点 画 一 条 与 X 轴 牌 直 
的 线 ， 这 条 线 也 以 步 为 单位 ， 划 上 刻度 。 从 中 心虚 向 上 守 为 
正 值 ， 从 1L 步 到 100 步 。 从 中 心 点 向 下 为 负 值 , 从 一 1 到 一 100 
步 ， 这 条 直线 叫 Y 轴 《图 3-5 ) 。 
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100 


0 一 一 = 
DB --- .50 40 


了 
100 


sr 


140 80 “50， 


这 样 屏 幕 上 的 任何 一 点 都 可 以 用 座 标 来 表示 了 。 如 图 
3-5 中 人 A 点 ， 它 对 应 和 X 轴 座 标 为 50，Y 轴 座 标 也 为 50， 于 是 
便 可 表示 为 A(50，50)， B 点 则 要 表示 为 B( 一 80，40)。 括 号 
里 两 个 数值 中 前 一 个 表示 X 轴 的 座 标 值 ， 后 一 个 表示 立轴 的 
座 标 值 ， 不 可 搞 颠 倒 了 。 

那么 我 们 如 何 将 海鱼 移动 到 A 点 或 者 了 B 点 呢 ， 这 要 用 到 
以 下 两 个 命令 


peererr 二 一 一 -一 -一 ret 


SETX 参数 
SETY 
SETXY 多数 人 


Ice 人 交 - 一 -Tar 


其 中 ， 参 数 为 座 标 值 ，SETX 是 将 海 色 移 至 参数 值 所 指 
9 47 。 


的 X SETY 是 将 海龟 移 至 参数 值 所 指 的 Y。SETXY 是 为 

将 海龟 移 至 参数 1 和 参数 2 所 指 的 (X，Y ) 座 标 位 团 上 。 
例如 ， 现 在 要 将 海龟 移 至 A 点 或 B 点 ， 就 用 不 着 计算 要 

走 多 少 步 ， 转 动 乡 大 角度 。 直 接 用 上 面 给 出 的 命令 即 可 。 

将 海龟 移 至 A 点 的 命令 ， 

SETX 50 

SETY 50 

或 SETXY 50 50 

将 海龟 移 至 B 点 的 命令 ， 

SETX 一 80 

SETY 40 

或 9ETXY 一 80 40 

这 样 无 论 海龟 原来 在 什么 位 置 ， 执 行 移 位 命令 后 ， 便 会 
移 至 指定 地 点 了 。 

这 两 条 命令 是 确定 海龟 的 绝对 位 置 ， 并 没有 改变 海龟 的 
方向 。 即 假如 原来 海龟 在 初始 位 置 方向 是 向 上 的 ， 移 至 A 点 
后 方向 依然 向 上 。 

(2) 设置 海龟 的 方向 

有 时 希望 将 海龟 设 定 指向 某 一 角度 而 与 原来 的 指向 无 
关 ， 这 时 要 用 一 个 规定 ， 0 或 360 度 为 海龟 指向 正 上 方 ，180 
度 指向 正 下 方 ，90 度 指向 正 右 方 。 则 用 如 下 命令 来 设置 海 他 
的 方向 : 


如 SETH 270 则 表示 海 危 指 回 正 左 方 。 

(3) 如 何 知道 海 优 的 位 置 与 方向 

当 我 们 画 一 个 复杂 图形 时 , 由 于 海 估 转 来 转 去 ,使 我 们 一 
时 不 清楚 海龟 的 位 置 和 方向 。 而 命令 HEADING、XCOR 
和 YCOR， 可 以 让 计算 机 告诉 我 们 海 危 目 前 的 位 置 和 方向 。 

当 我 们 键入 


reerrir 天 sara TMP- 


PRINT HEADING XCOR YCOR 

屏幕 上 立即 显示 出 ， 180 一 80 40 

意思 是 海 色 目 前 的 方向 是 指向 正 下 方 ， 位 置 为 〈 一 80， 
40)， 即 X 座 标 值 为 二 80，Y 座 标 值 为 40， 即 图 3-5 的 了 B 点 。 

23 .美丽 的 色彩 

如 果 你 的 显示 器 是 彩色 电视 机 或 者 彩色 显示 器 ， 你 便 可 
以 在 不 同 颜色 的 背景 下 ， 画 出 彩色 线条 。 

命令 如 下 ， 


PENCOLOR( 缩 号 PC) ”颜色 编号 〈 彩 笔 ) 
BAC KGROUND( 缩 写 BG) 颜色 岗 吕 《背景 ) 


re 


其 中 颜色 编号 如 下 ，0 一 一 黑色 ;1 一 一 白色， 2 一 一 
绿色 ;3 一 一 紫色 ;14 一 一 村 黄色 ;5 一 一 蓝 色 。 

如 果 你 没有 明确 定义 普 景 和 彩 笔 的 颜色 ，LOGO 将 自动 

地 采用 背景 为 0 ( 即 黑色 ) ,而 彩 笔 则 自动 地 采用 1( 即 白色 )。 

a。 49 。 


另外 ， 在 选择 色彩 时 也 有 一 些 规定 ， 在 桔 黄色 或 者 蓝 色 
背景 上 不 能 用 绿色 或 紫色 的 彩 笔 。 在 绿色 和 紫 便 的 普 景 上 也 
不 能 用 村 黄色 或 蓝 色 的 彩 笔 。 

如 果 你 在 屏幕 上 作画 ,然后 改变 背景 颜色 ,那么 画 中 各 行 
的 色彩 也 会 改变 ， 或 者 会 产生 奇妙 的 效果 。 有 些 人 喜欢 用 这 
些 效果 来 实践 。 而 最 好 的 办 法 是 ， 如 果 要 改变 背景 颜色 ， 先 
要 清除 屏幕 。 清 除 屏幕 的 命令 ，CS.。/。 

为 了 获得 清晰 的 色彩 ，LOGO 系 统 画 出 的 线条 部 比 较 
粗 ， 如 果 你 不 考虑 颜色 效果 ， 采 用 背 其 6 和 彩 笔 ， 则 能 使 海 
他 在 显示 屏幕 上 画 出 漂亮 的 细 线 。 

表 3-1 列 出 在 不 同 号 背景 上 作画 时 ， 不 同 号 彩 笔 的 效 


守 3-1 


绿色 | 枯黄 | 梢 费 | 白色 
上 


蛇 色 | 蓝 色 | 监 色 | 白色 


果 。 


下 面 我 们 用 不 同 的 颜色 郴 一 个 正方 形 ， 而 它 的 四 条 边 分 


别 为 黑色 、 绿 色 、 紫 色 和 村 黄 色 ， 而 背景 用 向 色 ， 


BG 
了 PC 


FD : 


有 R 工 
PC 


FD 


有 RT 工 
PC 
FD 
有 人工 
PC 
ED 
RT 


24., 让 海龟 学 些 新 本 嘉 


90 


前 面 我 们 已 经 介绍 了 海鱼 作 疼 的 基本 命令 ， 并 画 了 一 些 
简单 图 形 ， 现 在 假如 我 们 想 在 正方 形 中 间 再 画 一 个 小 正方 


形 ， 而 且 两 个 正方 形 之 间 不 留 痕 迹 的 话 怎 么 办 呢 ? 


这 里 提供 一 个 抬 笔 的 命令 和 需要 画 线 时 的 一 个 落笔 的 命 


ee 51 。 


EENUP 。 ( 纳 写 PU) 抬 笔 
PENDOWN (缩写 DD) 落笔 


这 样 ， 当 我 们 将 大 正方 形 画 好 后 ， 下 达 抬 笔 的 命令 使 海 
龟 走 到 小 正方 形 的 位 置 ， 然 后 再 下 达 落 笔 的 命令 ， 郴 出 小 正 
方形 ， 两 个 正方 形 之 间 就 不 留任 何 痕迹 了 。 

具体 如 何 画 ， 大 家 自己 在 电脑 上 试 一 试 。 

当 我 们 在 画 较 为 复杂 的 图 形 时 ， 海 龟 转 来 转 去 ， 有 时 海 
龟 挡 住 了 我 们 的 视线 ， 看 不 清 究竟 要 转 多 大 的 角度 ， 这 时 我 
们 可 以 将 海龟 暂时 隐藏 起 来 ， 即 键入 藏 龟 的 命令 需要 时 再 
将 海龟 显示 出 来 。 下 达 的 命令 为 ， 


HIDE TURTIE E (缩写 HT) 茂 色 
SHOWTURTIE 《缩写 2 显 龟 


在 我 们 画 完 一 个 图 水 ， 在 画 另 一 个 图 形 之 前 ， 需 要 将 愤 
训 清 干净 ， 并 且 将 海龟 移 回 到 原点 一 一 屏幕 的 正中 央 ， 此 时 
键入 清 屏 命令 


一 =-==- 一 -aerrx 一 一 一 = 一 -一 > 


CLEAR9SCREEN (缩写 C5) 清 屏 


=====- 一 = 一 1 


一 = 一 一 一 一 


当 我 们 键入 C5 .之 后 ， 居间 就 被 清除 干净 ， 海 匈 移 至 
中 央 。 
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二 ，、 进 一 步 的 海龟 课题 
25. 让 学 习 机 记 住 海龟 的 作品 


前 几 节 我 们 在 用 海龟 作 图 时 ， 是 通过 不 断 地 下 达 命 令 让 
海龟 完成 的 。 每 键入 一 条 命令 , 按 完 回 车 键 后 ， 计 算 机 就 会 立 
即 执行 ,这 种 执行 方式 称 为 “立即 执行 方式 ”。 这 种 方式 计算 
机 等 待 时 间 长 , 而且 当 执 行 完 这 条 命令 后 图 形 就 会 从 计算 机 
上 消失 了 。 例 如 画 正 方形 ， 我 们 将 许多 条 命令 一 一 键入 ， 屏 
幕 上 会 画 出 现 一 个 正方 形 。 而 假如 说 我 们 要 画 儿 个 正方 形 ， 
或 者 在 另 一 个 图 上 需要 正方 形 时 ， 又 要 重新 将 这 一 串 命 令 键 
入 ,比较 烦琐 。 而 LOGO 语 言 却 能 教会 学 习 机 画 这 些 图 形 ,并 
且 存 起 来 ， 当 我 们 在 需要 的 时 候 可 直接 从 “记忆 ?中 取出 。 

下 面 就 让 我 们 先 教学 习 机 来 天 正方 形 ， 

首 和 党 给 楼 画 的 这 张 图 赵 一 个 备 字 ， 杠 不 能 与 LOG@@ 命 令 
的 名 学 相同 。 这 里 我 们 就 选 正方 形 三 个 字 的 汉 往 失 音字 头 
ZFX 吧 。 

要 教会 学 习 机 画 正方 形 ， 必 须 键入 ， 

TO 2ZFX 

FD- 50 

RT290 

正 甬 50 

RT 90 

人 503 昌 


ED 50 

有 RT 90 

FD 50 

RT 90 

END 

第 一 行 TO_ZFX 就 是 告诉 学 习 机 ， 要 教 给 它 一 个 新 命 
令 就 是 ZFX， 接 下 来 八 行 是 怎样 画 正方 形 ， 最 后 一 行 上 NE 
是 告诉 学 习 机 教 它 画 正方 形 的 过 程 结 束 了 。 

最 后 键入 CTRL-C。 屏 幕 上 出 现 

ZFX DEFINED 

这 时 ， 我 们 键入 ZFX</ ， 屏 幕 上 会 立即 画 出 一 正方 
形 ， 说 明 学 习 机 已 经 学 会 并 记 住 了 如 何 画 正方 形 了 。 

像 上 面 那样 由 若干 条 LOGO 命 令 组 合 在 一 起 ,. 完成 其 一 
特定 任务 的 经 过 ， 我 们 称 之 为 过 程 。 在 使 用 上 ， 就 像 一 条 命 


令 一 样 。 
过 程 的 整体 形式 是 ， 
TO “过 程 的 名 子 》 …… 过 程 头 ? 
过 程 内 容 …… 过 程 体 
END ，…… 过 程 尾 。 


当 键入 TO 过 程 名 后 ， 提 示 符 “? ”消失 。 说 明 现 在 处 
于 一 个 新 的 模式 ， 称 为 程序 定义 模式 。 当 处 于 程序 定义 模式 
时 ， 键 入 的 命令 计算 机 并 不 执行 ， 而 是 将 正在 定义 的 过 程 贮 
存 起 来 ， 当 最 后 键 和 END 和 CTRL-C 后 ， 计 算 机 以 LOGO 
语言 给 出 一 个 信息 作为 回答 ， 


。， 54。， 


ZFX DEFINCED 

表明 过 程 已 经 定义 完毕 ， 并 退出 定义 模式 。 这 时 当 我 仙 
键入 ZFX /就 能 画 出 一 个 正方 形 来 。 

同样 的 方法 我 们 可 以 教会 学 习 机 画 三 角形 ， 

TO SJX 

REPEAT 3 [CFD 60 ET 120] 

END 

这 时 学 习 机 便 学 会 画 三 角形 了 。 于 是 ， 我 们 便 将 SJX 作 
为 新 的 LOGO 命 令 用 于 进一步 的 定义 中 。 


26 .编辑 


假如 一 个 过 程 已 被 定义 和 使 用 ， 但 又 感到 不 怎么 满意 ， 
这 时 可 以 对 它 进行 修改 和 编辑 。 当 我 们 键入 下 DIT 和 过 程 标 
题 之 后 ， 系 统 便 进 入 编辑 模式 ， 此 过 程 的 内 容 会 在 屏幕 上 列 
出 ， 这 时 就 可 以 修改 。 

我 们 以 过 程 ZFX 为 例 。 若 键入 ， 

EDIT 2ZRFX 

计算 机 进入 编辑 模式 ，ZFX 过 程 被 列 出 ， 

TO _ZFX 

FD 50 

RT 90 

FD 50 

RT 90 

FD 50 


刀 5D5 。 


RT 90 

FD 50 

RT 90 

SND 

这 时 光标 在 屏幕 的 左上 和 角 人 字段 上 。 下 面 我 们 介绍 经 党 
用 到 的 几 个 编辑 命令 供 过 程 的 修改 和 编辑 用 。 

(1) 移动 光标 

下 面 这 些 键 能 将 光标 上 、 下 、 左 、 右 移动 ， 但 不 改变 任 
和 字符; 

CTRL 一 P ”光标 向 上 移动 一 行 ! 

CTRL--N 光标 向 下 移动 一 行 ! 

上 网 光标 向 左 移动 一 格 ! 

节 [ 光标 向 右 移动 一 格 。 

-- 般 我 们 使 用 上 述 键 是 为 了 将 光标 移 至 要 修改 的 字符 处 
等 待 修改 。 我 们 可 以 试 一 试 ， 比 如 我 们 想 将 上 例 中 所 有 的 
RT 改 为 LT， 于 是 我 们 连续 用 CTRL 一 N， 将 光标 移 至 第 一 
个 “R” 处 。 

请 记 住 ， 键 入 上 述 键 时 ， 一 定 要 按 住 CTRL 键 不 放松 ， 
然后 再 按 N 键 或 P 键 。 

(2) 删除 光标 处 字符 

CTRL--D 键 ， 可 以 擦 陈 光 标 所 在 位 置 的 字符 ， 如 ; 

RTIT 90 

上 

按 CTRL 一 D 会 出 现 ， 


e。 RAR 。 


个 90 

4 _ 

懂 计 | 

再 键入 L， 有 

LT 90。 

抄 竺 | 

以 上 操作 实际 上 是 将 及 改 为 工 。 

(3) 在 行 的 中 间 揪 入 字符 

需要 在 行 的 中 间 捅 入 一 个 或 多 个 字符 时 ， 需 将 光标 移 到 
待 播 入 字符 的 位 置 ， 这 时 可 键入 需要 插入 的 字符 。 如 ， 

LT 90 


[ 
赤 标 | 


键入 EF 后 将 得 到 ; 
LERFT 
| 光标 | 


光标 前 的 EE 就 是 刚 插入 的 字符 。 将 光标 移 到 下 上 ， 按 
两 次 CTRL 一 D 键 ， 即 可 删 去 EF。 

(4》 在 已 有 的 行 间 反 入 新 行 

移动 光标 至 准备 捅 入 的 一 行 的 上 一 行 行 首 ， 接 下 CTRL 
一 9 键 ， 会 在 此 行 下 面 出 现 一 空 行 。 

工 工 90 

下 

| 光标 | 

按 CTRL 一 O 则 打开 空 行 供 播 入 用 ， 

。57 。 


LT 90 

供 标 | 

FD 50 

现 键 入 ， 

AAL/ 

将 变 为 

LT 90 

AA 

FD 50 

这 样 ， 在 两 行 之 间 便 插入 一 新 行 ， 内 容 为 AA。 

(5) 删除 光标 左 侧 的 字符 

如 果 想 删除 光标 左 侧 的 字符 ,可 利用 键 起 到 橡皮 的 
作用 。 这 样 ， 可 以 将 我 们 键入 的 某 个 错字 符 控 去 。 

(6) 退出 编辑 

退出 编辑 状态 一 般 分 为 这 两 种 情况 ， 

@ 不 保存 编辑 结果 ， 退 出 编辑 ， 有 时 ， 当 你 进入 编辑 模 
式 后 会 突然 改变 主意 ， 此 时 键入 CTRL 一 G 后 ， 便 会 退出 编 
辑 状态 ， 刚 键入 的 任何 编辑 命令 都 会 作废 ， 即 所 作 的 一 切 修 
改 无 效 。 

加 保存 编辑 结果 ， 退 出 编辑 状态 ， 当 我 们 经 过 编辑 修 
改 ， 认 为 满意 后 ， 键 入 CTRL 一 C， 便 会 将 编辑 结果 保存 起 
来 ， 并 退出 编辑 状态 。 

编辑 命令 小 结 

CTREL 一 P 光标 上 移 一 行 
。58 。 


CTRL 一 N 光标 下 移 一 行 ? 
| 坷 光标 左 移 一 格 ; 

区 | 光标 右 移 一 格 ; 
CTRL 一 D “删除 光标 处 字符 ; 
CTRL 一 ”增加 一 空 行 供 播 入 3 
CTRL 一 G 不 作 贮 存 退 出 编辑 
CTRL 一 C 保存 结果 退出 编辑 。 


27. 新 的 探索 


前 面 我 们 已 经 教会 电脑 作 一 些 图 形 一 一 定义 过 程 ， 但 能 
不 能 在 不 改变 过 程 内 容 的 前 提 下 改变 图 形 的 大 小 和 形状 呢 ? 
回答 是 肯定 的 。 

〈1) 改变 图 形 大 小 的 输入 参数 

看 图 3-6。 这 个 图 案 是 四 个 大 小 不 同 的 正方 形 ， 现 在 我 
们 要 用 同一 个 过 程 来 实现 它 。 


TO ZFX :x 
FD :x 
LT 90 
。59 。 


FED : 式 

LT 90 

FED ;x 

LT 90 

FD ;zx 

LT 90 

END 

或 者 也 可 以 用 这 种 方法 来 实现 

TO ZFX ;zx 

REPEAT 4 [FD ,xz LT90] 

END 

其 中 x 称 为 变量 ， 在 这 个 例子 中 它 代表 了 正方 形 的 边 
长 。 要 想 画 出 不 同 边 长 的 下 方形， 就 要 在 执行 时 送 入 不 同 的 
数值 。 例 如 ， 我 们 先 通 出 上 图 中 最 小 的 正方 形 ， 即 可 键入 
BFX 30; 而 ZFX 60 就 画 出 一 个 大 正方 形 来 。 

(2) 改变 图 案 形 状 的 输入 参数 

贺 案 的 形状 是 由 其 角度 和 边 数 决 定 的 ， 因 此 改变 这 两 个 
输入 人 参数， 就 可 以 改变 图 形 的 形状 画 出 任 沪 边 数 和 任意 长 度 
的 正 多 边 形 。 我 们 将 这 个 过 程 取 名 为 多 边 形 (DBX) ， 用 工 
作为 边 长 变量 ， 用 c 作为 角度 变量 ， 

TO DBX ,xz :a 

REPEAT 360/:a [FD :xz RT :a] 

END 

其 中 ，360/:a 是 计算 边 数 ， 因 为 引 多 边 形 每 个 角 相 等 ， 


ee。 60 。 


而 旋转 一 周 回 到 起 始点 为 380 度 ， 当 a=90,360/190 一 4, 画 出 


四 边 形 ， 当 a=72，360/72=5， 画 出 正 五 边 形 (图 3-7)。 


上 


正 五 边 形 
图 3-7 


用 这 个 过 程 还 可 以 画 出 一 个 圆 ， 即 键 
入 DBX 1 1( 图 3-8 ) 。 
这 个 圆 可 以 看 作 由 许多 非常 短 的 边 组 
成 的 。 前 进一步 ， 旋 转 一 度 ， 便 可 以 画 出 
一 个 圆 来 。 
需要 有 两 个 输入 参数 的 另 一 个 图 形 例 图 3-8 
区 是 长 方形 ， 它 需要 有 两 个 不 同 的 尺寸 与 长 和 宽 相对 应 。 


到 过 程 名 为 CFX 《长 方形 )， 用 a 变量 表示 长 ， 用 


寿 量 表示 宽 。 过 程 如 下 ; 
TO CFX :a :b 


FD :a CFX 80 50 
RT 90 妈 RX 25 50 

FD ,b 记 

RT 90 CEX X100 :25 

FD ?8 国 3-9 


ee 61 。 


RT 9 

FD :b 

RT 90 

END 

仅仅 用 一 个 过 程 ， 便 可 以 画 出 无 数 个 不 同 的 长 方形 闪 
〈 图 3-9 ) 。 当 两 个 输入 参数 相同 时 ， 又 可 以 画 出 许多 正 市 
形 。 


28 .过 程 和 子 过 程 


教会 学 习 机 的 一 个 命令 叫做 一 个 过 程 ， 而 一 个 过 程 就 象 
工 OGO 的 原始 命令 一 样 可 以 被 使 用 ， 当 一 个 过 程 用 来 作为 另 
一 个 过 程 的 一 部 分 时 ， 就 把 它 叫 做 子 过 程 。 

使 用 子 过 程 来 画图 ， 可 以 说 是 LOGO 语 言 中 最 重要 、 最 
有 用 的 功能 。 因 为 许多 极其 复杂 的 图 形 ， 都 是 由 一 些 基本 图 
形 组 成 的 。 若 用 子 过 程 来 表达 一 些 基本 图 形 ， 会 使 许多 看 起 
来 非常 难 画 的 图 变 得 异常 简单 。 如 图 3-10~13 等 有 趣 的 图 


图 5-10 图 5-11 


2 62 。 


图 3-12 图 5-13 

形 ， 都 是 由 正方 形 组 成 的 。 

我 们 还 可 以 将 画 正方 形 的 过 程 (ZFX) 作为 LOSO 语言 
中 的 一 个 命令 来 使 用 ， 就 如 同 FD、RT 一 样 。 但 ZFX 的 作用 
是 画 出 一 个 正方 形 。 若 加 上 参数 还 可 以 画 出 不 同 边 长 的 正方 
形 。 

现在 ， 我 们 准备 将 ZFX 作 
为 一 个 子 过 程 ， 来 画 一 扇 窗 户 
〈 图 3-14 ) 。 

这 扇 窗户 是 由 四 个 大 小 相同 
的 正方 形 组 成 的 。 正 方形 过 程 已 
经 教会 学 习 机 了 # 如 果 还 没有 教 
会 它 ， 只 要 键入 本 章 “25.” 中 
ZFX 的 过 程 就 可 以 了 。 图 3514 

在 学 习 机 已 经 学 会 了 如 何 画 正方 形 以 后 ， 可 以 开始 画 瘤 
户 了 。 我 们 起 名 为 (C 也 )， 

TO CH 


ae。 63 。， 


ZEFX 

LT 9f 

OFX 

LT 90 

ZFX 

LT 90 

ZFX 

LT 90 

END 

即 画 一 个 正方 形 就 让 海龟 旋转 90 度 ， 直 到 海龟 又 回 到 起 
始 位 置 与 起 始 方向 ， 一 扇 窗户 的 图 案 便 完 成 了 。 

当然 ， 你 如 果 想 继续 画 下 去 ， 的 确 是 一 个 好 主意 ， 可 将 
窗户 作为 一 个 子 过 程 ， 再 组 成 新 的 图 案 ， 如 图 3-15。 想 一 
想 ， 这 个 过 程 访 如 何 写 呢 ? 


5-16 
图 3-15 
下 一 个 适用 子 过 程 的 典型 例子 是 画 一 片 小 树林 〈 图 3 - 
64 。 


i3》。 
小 树林 是 由 -* 棵 棵 小 树 组 成 的 ， 小 树 由 从 、 粹 、 时 组 成 
A 图 3-~17 ) 名 


图 3-17 


先 将 “ 叶 ” 的 过 程 编写 出 ， 编 写 “ 梓 ”过 程 时 可 以 调用 
“ 叶 ” 过 程 ， 编 “从 ”过 程 时 ， 可 以 调用 “ 极 ” 过 程 ， 编 
“ 树 ” 过 程 时 可 以 调用 “从 ”过 程 ， 编 “ 霖 ”过 程 时 便 可 以 
油 用 “ 栅 ” 过 程 了 。 


(1 时 过 程 〈Y 忆 ) (2) 枝 过 程 〈ZHI) 
TO YE TO ZHI 
工 工 45 FD 15 
FED .10 了 也 
BACK 10 FD 15 
了 R 工 90 Y 瓦 
FD 10 FD 10 
BACK 10 BACEK 40 
也 45 END 


9 68 


END 


(3) 丛 过 程 (CONG) (4) 树 过 程 (SHU) 
TO CONG TO SHU 
工 工 60 CONG 
REPEAT 7 [ZHI BACKR 60 
RTIT 20] FD 60 
工 T 80 END 
END 

最 后 我 们 就 可 以 很 快 地 写 出 “ 林 ” 的 过 程 ， 

TO LIN 

PU 

LTIT 90 

FD: 70 

RT 90 

PD 


REPEAT 2 [SHU PU RT 90 FD, 70LT 90.PD] 
SHU 


END 

也 可 以 将 画 树 与 树 之 间 的 间隙 作为 子 程序 写 一 段 过 程 
(YI)， 

TO YI TO YIN 

PU REPEAT 3 [SHU YI] 

LT 90 


FED 70 


? 06 。 


RT 90 

PD 

END 

这 样 的 程序 设计 多 么 像 堆 积木 呀 ! 一 个 大 的 模型 由 关 干 
个 简单 的 积木 块 构成 。 这 就 是 LOGO 语 言 的 特点 ， 这 种 设计 
方法 就 称 为 结构 程序 设计 ， 它 为 程序 设计 开创 了 新 的 一 页 。 


29 ,海龟 的 作品 


通过 前 面 的 学 习 ， 我 们 可 以 看 到 海龟 具有 各 种 各 样 的 本 
领 ， 现 在 ， 该 是 让 海 凶 给 我 们 表演 的 时 候 了 。 

(1) 画 一 座 房 子 ( 如 图 3-18 ) 

先 来 分 析 一 下 房子 的 结构 ， 它 是 由 房 
项 、 墙 壁 和 门 组 成 。 下 面 我 们 就 像 羡 房 子 站， 
一 样 ， 将 它们 分 别 做 好 ， 然 后 再 安装 起 内 


来 。 | Y ， 
| 
先 画 墙 壁 , 它 实际 上 是 一 个 正方 形 ,我 


们 可 以 将 已 定义 好 的 正方 形 (过 程 ZFX) 图 5-18 
直接 使 用 : 

TO QIANG 

ZFX 25 

END 

门 实际 上 是 一 个 小 的 长 方形 ， 那 么 可 将 画 长 方形 的 过 程 
CFX 直 接 使 用 : 

TO MEN 


e 67 。 


CEFX 15 

防 NDD 

许 罗 网 S 祭 上 是 一 个 司 洽 角形 ， 则 二 朋 形 运程 9JX 可 吉 接 
使 用 ， 

TO _ DING 

SJX 35 

END 

各 种 部 件 均 已 做 完 。 下 一 步 就 是 要 如 何 安装 了 。 安 装 可 要 
有 一 定 的 技术 ， 否 则 会 装 颠 倒 , 或 者 接 不 上 ,房子 显得 不 能 用 
或 不 安全 。 所 以 ， 一 定 要 考虑 周密 。 先 将 墙 竖 起 来 !》 走 到 门 
的 位 置 ， 装 起 门 ; 然后 再 盖 房 顶 。 

TO FANG 

QIANG RT 90 FD 140 LT 90 MEN LT 90 

FDI10 RT90 FD25 LT'90 FEFD5 RT180 

DING END 

至 此 ， 我 们 的 小 房子 便 盖 起 来 了 。 er 

从 画 小 房子 的 过 程 ， 我 们 可 以 刹 出 海 
邹 画 图 和 我 们 平时 画图 有 很 大 的 区 别 ， 学 SS 人 
习 机 必 况 是 机 器 人 ， 它 的 一 举 一 动 全 靠 人 ” 
来 指挥 。 即 使 有 点 错误 ， 它 也 不 会 帮 你 纠 
正 。 

《2)》 画 一 个 小 人 

前 画 海 急 已 秀 为 我 们 画 了 一 座 谎 子 ， 5-19 
钢 在 海 怨 逐 要 再 为 我 们 画 一 位 此 谎 子 的 主 人 ， 就 像 图 3-19 
se 638 。 


- 样 ， 有 头 、 身 子 、 手 辟 和 腿 。 


@ 国 皮子 最 简单 ， 尖 继 将 成 密 ， 
全 95 丙 涂 N 
FD 50 
上 上 ND 
四 头 ， 我们 按照 先 画 脸庞 ， 再 画 路 、 尝 子 、 最 后 画 服 
脸庞 是 一 个 圆 ， 其 余 由 线段 组 成 。 
TO TOU 
LT 90 REPEAT 72 [FED1 RT5] RT 90 BTU 
FD3ILT90PDEFED3BK6FD3RT90 
PU FD 2 PPEFD5PUEFD2ELT90FD 3 了 二 
FDI1IPUBK8PDEFD1I1PUEFD3ELT90 
FD 12 PD 
匡 ND 
转手 臂 ， 
TO SHOU 
LT 90FD-30 BK 60 FD 30 RT 90 
END 
由 腿 ， 
TO TUI 
工人 下 135 FFD 40 当下 40 工 了 90 下 局 40 BK 40 
工人 135 
代 玉 局 
多 将 头 、 髓 子 、 手 臂 和 月 安装 起 来 ， 
。69 。 


TO REN 

SHEN TOU FD 5 SHOU FD 45 

工人 180 TUI 

END 

当 我 们 再 次 键入 REN 后， 一 个 小 人 便 会 出 现在 屏幕 
上 也。 


三 、 更 深入 的 海龟 课题 


这 一 章 我 们 将 进行 更 深入 的 海龟 课题 ， 即 通过 重复 、 递 
归 等 手段 ， 使 海龟 画 出 更 加 奇妙 的 图 形 来 。 


30 .美丽 的 螺旋 线 


在 上 一 章 里 我 们 学 习 了 过 程 和 子 过 程 。 所 亩 子 过 程 ， 就 
是 一 个 过 程 被 另 一 个 过 程 所 调用 。 那 么 假如 一 个 过 程 调用 其 
自己 本 身 ， 即 把 本 身 作 为 子 过 程 ， 那 将 出 现 什么 情况 呢 ? 

让 我 们 来 做 一 次 试验 吧 ， 我 们 把 这 个 过 程 起 名 为 LUO: 

TO LUO :x 

FED :x LT 90 

LUGO :x 十 2 

END 

当 我 们 键入 :LUO 5 -/ 

在 我 们 面前 便 会 出 现 一 个 漂亮 的 
螺旋 线 (图 3--20 ) 。 
。70 。 


那么 它 是 如 何 形 成 的 呢 ? 下 面 让 我 们 分 析 一 下 海龟 的 执 
行 过 程 

海龟 首先 执行 FED :x LT 90 前 进 5 步 , 左 转 99 度 ， 这 
时 ， 下 一 语句 为 LUO :xx 十 2， 这 就 意味 着 要 返回 来 调用 自 
已 本 身 ， 但 参数 增加 了 2 ， 即 x=7 -。 于 是 下 一 步 就 要 前 进 
7 步 ， 左 转 90 度 ， 又 执行 到 LUO :x+ 十 2， 于 是 又 在 7 步 的 
基础 上 增加 2 ， 前 进 9 步 ， 左 转 90 度 ，…… 。 就 这 样 反 反 复 
复 地 一 直 执 行 下 去 。 

你 也 许 会 问 ， “海龟 能 自己 停 下 来 吗 ? ”这 个 问题 问 得 
好 。 但 回答 是 ;，“ 它 自己 不 会 停 下 来 ! ” 

如 果 要 想 使 海 色 停 下 来 ， 可 以 按 CTREL 一 G 键 。 

能 不 能 寻找 一 种 方法 预先 控制 海龟 在 合适 的 地 方 停 下 来 
呢 ? 可 以 。 如 果 设 置 一 个 关卡 ， 当 海龟 通 不 过 关卡 时 ， 就 用 
STOP 命令 ， 使 它 停 下 来 。 

在 上 面 例子 中 ， 每 递归 调用 一 次 ， 边 长 x 增加 2 ， 如 果 
命令 当 xx 之 50 时 ， 海 龟 应 停 下 来 ， 那 么 ， 这 便 是 一 个 关卡 。 
“如 果 x>50 停 下 来 ” 用 LOGO 语句 来 描述 ， 应 表示 为 : 
“IF( 如果)…STOQOP ( 停 ) ”形式 ， 则 有 

IF :xy>50 STOP 

一 旦 x 的 值 大 于 50， 海 龟 便 会 自动 停 下 来 。 

x> 之 50 成 为 停 下 来 的 条 件 ， 因 此 我 们 称 此 语句 为 条 件 语 
句 。 

现在 我 们 用 条 件 语句 将 上 面 的 过 程 加 以 改造 : 

TO LUGO : 式 

71 。 


IF xx>50 9TOP 

FD :;x RT 90 

LUO :x 十 2 

匡 N 了 3 

当 我 们 再 次 键入 LUO 5 时， 螺旋 线 便 会 在 边 长 增 至 50 
步 时 ， 自 动 地 停 下 来 。 

通过 上 面前 试验 ， 可 以 看 出 当 过 程 调用 自己 本 身 时 ， 便 
会 画 出 奇妙 的 图 形 。 一 个 过 
程 被 另 一 个 过 程 调用 时 ， 我 
们 称 这 个 被 调用 的 过 程 为 子 
过 程 ， 而 把 一 个 过 程 调用 自 
已 本 身 称 为 “ 递 归 ”。 

如 果 将 上 一 过 程 稍 加 改 
动 ， 便 能 画 出 更 多 形状 的 螺 
旋 线 (图 3-21、22 ) 。 

TO9LUGH yx ， :a 

F xD>50.3TOP 

EBD 3X 及 T 28 了 及 : 江 

LUQD1 :x 二 3 RT :a 

END 

图 3-21 是 x 二 5,a 一 1203 
图 3-22 是 x=5，a 一 144。 

除 此 之 外 ,一些 简 单 的 
过 程 通过 递归 调用 会 引出 许 图 22 
e。.72-。 


多 意 想不到 的 结果 。 

大 家 都 可 以 在 学 习 机 上 作 一 王 这 样 的 实验 ， 对 用 海龟 画 
一 个 图 形 ， 随 便 画 一 个 什么 图 形 都 可 以 ， 然 乓 将 官 放 入 递归 
过 程 中 ， 看 会 出 现 什么 结果 。 

以 一 个 简单 的 图 形 〈 图 3-23 ) 为 例 。 


图 3-235 3-24 


先 将 图 3-23 编 写成 过 程 ， 取 名 FENGCHE， 
TO FENGCHE 

FD 50 

工 工 90 

FD 20 

工 工 120 

FD 30 

78 。 


END 

将 它 放 入 递归 过 程 之 中 

TO FENGCHEI1 

FENGCHE 

FENGCHE1 

END 

当 我 们 键入 FENGCHE 1 /后 ， 便 会 出 现 一 个 漂亮 
的 “风车 ”〈 图 3-24 ) 。 

这 样 的 实验 你 可 以 做 许多 个 ， 一 定 会 给 你 带 来 无 穷 的 乐 
趣 。 

31. 设 置 关卡 


在 上 一 节 里 我 们 用 到 了 IF 语句 ，IF 语 句 使 学 习 机 有 了 
判断 能 力 ， 它 的 一 般 格 式 ; 


一 一 一 


IE 条 件 表达 式 ”执行 某 种 功能 


当 条 件 表 达 式 成 立时 ， 就 执行 方 括号 里 指出 的 某 种 功 
能 。 

所 谓 条 件 表 达 式 就 是 用 “>”; “:-=”; “<，” 等 连接 
起 来 的 式 子 ， 像 上 例 中 的 x 之 50 或 者 x<3 等 等 。 

这 里 仍 将 上 一 节 螺 旋 线 的 过 程 作 例子 。 

TO LUO ;xx 


ee 7T4。 


IE :x>50 STOP 

FD :x RT 90 

LUO :x 十 2 

END 

首先 定义 了 初始 长 度 为 x ， 进 行 测试 ， 看 是 否 之 50， 不 
大 于 50， 前 进 x 步 ， 右 转 90 度 ，x 增 加 2 ， 再 进行 测试 ， 看 是 
否 大 于 50， 一 旦 大 于 50， 便 停止 执行 。 由 此 看 来 ，IF 语 名 起 
到 关卡 的 作用 。 但 IF 语句 是 不 是 放 在 程序 的 任何 地 方 都 能 起 
到 关卡 的 作用 呢 ? 这 个 问题 还 是 试 一 试 再 说 吧 ! 

我 们 将 IE 语句 放 在 程序 的 倒数 第 二 行 ， 看 一 看 效果 如 
何 ， 

TO LUO2 :xx 

FD :x RT 90 

LUGO2 :x 十 2 

IF :x>>50 9TOP 

END 

仔细 分 析 一 下 ， 大 概 学 习 机 永远 也 不 会 执行 到 IF 语句 。 
你 看 ， 程 序 执行 的 顺序 一 直 是 前 进 、 右 转 后 调用 其 自己 ， 又 
拐 回头 去 执行 ， 关 卡 起 不 到 任何 作用 。 由 此 看 来 ,IF 语句 
不 是 放 在 任何 地 方 都 能 起 到 关卡 作用 的 。 

在 LOGO 语 言 中 ， 还 有 另 一 种 设置 关卡 的 方式 ， 

TO LUO2 :x 

下 卫 9T :;x>50 

IFTRUE STOP 
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iFFALSE FD :,x RT 90 

工 UO2 :x 十 2 

END 

这 一 过 程 与 前 面 的 过 程 作用 一 样 ， 用 TEST (测试 ) 来 


测试 x 之 50 是 否 为 真 (TURE) ,如果 为 真 (IFTURE)， 即 一 
且 x 盖 50” 则 停 圭 执行。 反之， 如 果 为 假 (IFFALSE) 就 前 
进 x， 庙 转 90 度 ， 继 续 执行 上 去， 直到 x 之 50， 则 停止 执行 。 
这 与 前 面 的 IF 语句 虽然 形式 不 犬 一 样 ， 但 所 起 的 作用 是 相同 


的 ， 


统称 为 条 件 语 句 。 
32 ,图 形 的 生长 与 中 止 
当 我 们 将 下 面 过 程 输 入 计算 机 并 执行 时 ， 会 出 现 什么 情 


景 呢 ? 


程 ， 


TO KUO :zx 
ZFX :x 

KUO :x 十 3 

END 

其 中 ZFX :x 即 是 我 们 前 面 多 次 出 现 的 画 正方 形 的 过 
再 重复 一 遍 写 在 下 面 

TO ZFX :x 

REPEAT 4 [FD :,x RT 90] 

END 

当 我 们 键入 KUO 5 后 ， 只 见 屏幕 上 一 个 正方 形 在 不 


上 断 地 扩大 生长 (图 3-25 ) 。 
e 70 。 


要 想 使 它 停止 生长 ， 或 用 CTRIL 一 
G 强行 停止 ， 或 用 “IF” 语 名 设置 条 上 | 
件 ， 当 条 件 满足 时 ， 便 会 自动 地 停止 扩 和 
展 。 如 我 们 将 IF ,xy>100 STOP 放 
入 过 程 的 第 二 行 ， 执 行 时 ， 当 x>100，| 仙 
便 会 中 止 生长 。 村 

反 过 来 ， 我 们 也 可 以 将 图 形 由 大 到 图 5-25 
小 逐渐 缩小 ， 然 后 人 为 地 控制 它 ， 让 它 在 适当 的 时 候 停 下 
来 。 

图 3-26 有 些 像 一 座 小 塔 ， 是 由 从 大 到 
小 一 串 正方 形 组 成 ， 程 序 为 ; 

TO TA :x 

IF ;,x<3 STOP 

LE 5 党 

FD :34x 图 3-26 

TA :xma0.6 

END 

这 个 图 形 我 们 还 可 以 进一步 地 改进 成 
图 3-27。 


33 .图 形 的 自 旋 

当 我 们 学 会 了 让 图 形 不 断 地 彝 长 ， 然 
后 随意 地 让 它 终止 以 后 ， 又 一 个 大 腹 的 想 8 
法 产生 了 ， 怎 样 才 能 让 图 形 旋转 起 来 呢 ? 5-27 
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不 妨 试 一 试 。 

要 让 一 个 图 形 旋转 ， 就 要 在 面 完 一 个 图 形 之 后 ， 让 它 转 
动 一 个 角度 ， 然 后 再 画 一 个 同样 的 图 形 ， 再 转动 一 个 同样 的 
角度 ， 说 于 就 干 ， 仍 用 正方 形 来 作 试验 。 

正方 形 过 程 ZFX 已 用 过 多 次 ， 就 不 再 重复 了 。 

TO XUAN :a 

ZFX 25 

RT :a 

XUAN :a 

END 

当 我 们 键入 XUAN 45 ./ 和 XUAN 15 忆 /, 就 出 现 图 
3-28 和 图 3-29。 它 们 一 直 旋 转 着 ， 除 非 按 下 CTRL 一 G 键 。 


OOca 


We 


图 3-28 图 3-29 


XUAN 45 XUAN 15 
看 来 ， 我 们 的 实验 成 功 了 。 但 我 们 并 不 满足 ， 能 不 能 让 这 些 
图 形 一 边 旋转 又 一 边 生 长 呢 ? 
上 一 池 我 们 能 够 让 正方 形 不 斯 地 生长 ， 这 一 节 又 能 让 它 
自 旋 起 来 ， 把 这 两 个 程序 有 机 地 结合 起 来 ， 不 就 既 生 长 又 
。78 。 


自 旋 了 吗 ? 如 ， 

TO XUAN1 :zx 

ZEFX :x 

RT 20 

XUAN1L :x+ 十 5 

END 

当 我 们 键入 XUAN1 5 
< 后， 屏幕 上 便 会 出 现 图 3- 
30。 图 5-30 

让 我 们 回 过 头 来 分 析 一 下 这 个 过 程 。 先 调用 正方 形 
《ZEFX) 过 程 , 画 出 一 个 正方 形 之 后 ， 将 其 旋转 20 度 ， 遇 到 递 
归 行 ， 将 其 边 长 十 5 之 后 ， 又 调用 自己 再 画 出 以 〈 边 长 +5) 
为 边 长 的 正方 形 ， 又 旋转 20 度 。 这 样 将 正方 形 逐 渐 地 扩大 并 
以 20 度 为 旋转 角 ， 不 断 地 自 旋 ， 就 会 出 现 图 3-30。 


34 .海龟 的 新 作品 


通过 更 深 一 步 海 色 课 题 的 探讨 ， 一 些 令 人 眼花 滚 乱 的 图 
案 不 断 地 展现 在 屏幕 上 ， 使 海龟 画 的 图 形 更 加 棚 棚 如 生 了 。 
在 这 一 部 分 ， 我 们 一 直 是 以 正方 形 作为 基本 图 形 来 进行 变换 
的 ， 如 果 改 用 其 它 图 形 ， 屏 幕 上 会 出 现 什么 结果 呢 ? 

(1) 以 拖 形 为 例 ， 过 程 名 为 CFX 

先 建立 长 方形 过 程 ， 其 中 变量 cG、2 分 别 表 示 长 方形 的 长 
和 宽 。 

全 和 Fa， 圳 
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FD ,b 


FD :b 

RT 90 

END 

当 键入 a、b 的 数值 后 ， 屏 幕 
上 会 出 现 长 方形 ， 若 再 以 20 度 为 
旋转 角 转 动 起 来 ， 则 如 图 3-31。 

TO ZHUAN 

CEFX 100 20 

RT 20 

CFX 40 20 

RT 20 

ZHUAN 

END 

若 让 长 方形 一 边 向 左旋 转 一 
边 不 断 地 缩短 ， 当 a<10 时 就 要 
官 停 下 来 (图 3-32 ) ， 过 程 为 ， 

TO ZHUAN1 ,a 

IF :a<<10 STOP 


80 。 


CFX，a 20 

工 工 30 

ZHUAN1 :a 一 5 

END 

(2) 以 三 角形 为 例 

先 定义 三 角形 (SJX) 过 程 ， 

TO SJX ,a 

REPEAT 3 [FFD :a RT 120] 

END 

这 一 次 我 们 首先 让 三 角形 不 断 地 
生长 (图 3-33 ) ， 过 程 为 

TO SJX1 :a., 

IF :a>>100 STOP 3-33 

SJX ;a 

SJX1 :;a 十 5 

上 ND 

当 它 边 生长 边 旋 
转 ， 则 得 图 3-34， 即 将 
三 角形 生长 的 过 程 
SJX1 作为 子 过 程 ， 

TO SJX2 

REPEAT 6 [SJX1 

5 RT 60] 

匡 ND 


交 
um mmary 
SA NAN Te 了 morey ae 中 namepa dagger 
Sa erar roaanmdmetn mcapmaomcicB2Ten 天 
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当 TO 9JX3 
REPEAT 12 [SJX1L 1 RT 30] 
ENT 


则 出 现 图 3--35。 


AAAARRRRRRT 


为 了 在 更 广泛 的 领域 里 产生 出 更 多 妙趣 横生 的 图 案 ， 现 
在 我 们 将 涉足 “多 边 形 家 族 ”。 


35 .海龟 总 行程 定理 


在 前 面 的 章节 里 ， 我 们 已 经 接触 过 多 边 形 。 如 画 正 五 边 
ee。 82 。 


形 在 本 章 “ 一 、23.” 中 做 过 。 


7] 


画 正七 边 形 〈 图 3-36,a 王 40) ， 
TO QBX ;a 
REPEAT 7 [FD ,a LT 360/ 


E 


END 图 3-56 
还 可 以 接着 画 下 去 ， 如 正八 边 形 、 正 九 边 形 、 正 十 边 形 。 
但 不 管 海龟 走 过 什 么 路 程 ， 要 画 出 多 边 形 来 ， 必 然 要 转 


回 到 起 始点 ， 即 旋转 360 度 或 者 360 度 的 倍数 ， 这 就 是 海龟 总 
行程 定理 。 根 据 这 个 定理 ，- 我 们 写 出 正 多 边 形 过 程 ， 其 中 x 
代表 边 长 ，a 代 表 角 度 ; 


TO ZDBX :x :a 

REPEAT 360/a [FD :x RT :a] 

END 

这 样 ， 当 我 们 给 出 不 同 的 角度 时 ， 就 会 画 出 不 同 的 正 多 


边 形 ， 即 给 出 90 度 画 出 正方 形 ， 给 出 36 度 ， 天 出 正 十 边 形 。 


如 果 我 们 要 画 出 任意 多 边 形 ， 过 程 又 如 何 写 呢 ? 

我 们 可 以 引用 递归 来 完成 ; 

TO DBX :x :a 

FED :x 

RT 3:a 

DBX :x :a 

END 图 5-37 

当 x=50，a 王 135 时 ， 如 图 3-378 当 x=50,a 王 144 时 ， 
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加 图 3-38; 当 区 一 50， a 一 170 时 ， 如 图 3-39 当 x=60， 
3 一 150 时 ， 训 攻 3-40。 


图 3-38 图 3-59 图 5-40 

看 这 些 多 边 形 家 庭 的 成 员 个 个 神态 各 异 ， 独 具 反 沼 。 但 

你 千 万 不 要 忘记 ， 这 个 过 程 在 你 未 键入 CTRL-G 键 对 ， 它 
还 一 直 在 运行 ! 

你 可 以 尽情 地 用 这 个 过 程 去 作 更 多 有 逆 的 实验 ， 输 入 不 

同 的 数据 ,可 以 是 非常 小 的 一 组 数 , 像 DBX 10 1 也 可 久 是 极 

大 的 一 组 数 ， 像 DBX 200 1000 等 等 ， 看 屏幕 上 将 会 出 现 

什 笃 情 景 。 你 也 可 以 做 一 种 游戏 ， 铭 想 一 下 你 将 要 送 进 去 的 

一 组 数 会 形 威 儿 边 形 ， 然 后 看 一 下 屏幕 效果 与 你 猜想 的 是 否 

相符 ， 看 看 边 数 和 角度 之 间 是 否 符合 海龟 总 行程 定理 ， 即 海 

龟 走 完全 程 正好 要 旋转 360 度 的 整 倍 数 ， 并 且 海龟 的 指 问 仍 
回 到 初始 位 置 。 


36 .探索 使 海龟 停 下 来 的 新 方法 


上 一 闻 星 我 们 到 探讨 了 画册 俺 六 名 浴 参 过 形 的 避 程 。 
TO DBX :x :a 
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FD :x 

RT ;:a 

DBX :x :a 

END 

这 是 一 信 递 归 过 程 ， 如 果 不 郑 条件 跟 制 的 话 ， 它 会 无 体 

止 地 运行 下 去 ， 怎 样 才能 让 它 自动 停 下 来 呢 ? 前 面 我 们 已 经 
习 丑 了 用 IF 请 名 设置 关卡 ， 使 海 钨 在 条件 满足 时 停 下 来 ， 
如 IE， 边 长 >100 STOP。 

那么 要 使 海 怨 画 出 一 个 多 按 形 后 能 够 准确 地 、 自 动 地 停 
下 来 ， 又 要 设置 一 个 什么 条 件 才 合适 呢 ? 

这 时 我 们 想到 了 “海龟 总 行程 定理 ”一 一 海龟 从 过 始点 
出 发 ， 旋 转 一 圈 之 后 ， 又 回 到 原 地 ， 且 海龟 指向 与 起 始 时 相 
同 。 那 么 我 们 就 要 查看 海 优 的 朝向 在 旋转 一 周 之 后 是 否 与 起 
给 方向 相同 即 可 。 前 面 我 们 已 经 接触 到 HEADING 命令 ， 
六 个 命令 的 作用 是 检查 海龟 的 绷 回 。 假 若海 龟 的 起 始 位 置 为 
竖 直 加 上 〈 即 为 0) ， 那 么 我 们 就 以 HEADING=0 作为 条 
件 来 试 一 试 ， 

TO DBX :x 3:a 

FD :x 

RT :a 

IF HEADING=0 STOP 

DBX 3:x 3:a 

END 

当 我 们 的 源 危 以 紧 直 疝 上 的 石河 作 为 画 多 边 形 的 起 始 朝 
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同时 ， 走 完全 程 即 画 完 一 个 完 束 多边形 ， 便 会 自动 地 停 在 预 
定位 置 。 

但 假如 海龟 不 是 在 HEADING=0 时 开始 作 图 的 ， 那 
么 海龟 仍然 停留 在 HEADING =0 处 ， 这 样 所 画 的 多 边 形 
就 不 会 是 完整 的 。 怎 样 来 改变 这 种 状况 呢 ? 那 就 要 重新 设置 
使 海龟 停 下 来 的 条 件 一 -让 HEADING = 起 始 位 置 。 现 将 
起 始 位 置 起 名 为 A， 过 程 将 修改 成 ， 

TO DBX :x :a 

FD :x 

及 个 

IF _ HEADING= :A STOP 

DBX :x :a 

END 

那么 究竟 人 A 是 个 什么 数值 呢 ? 电脑 天 从 知道 。 但 我 们 可 
以 给 A 一 个 具体 的 值 ， 用 HEADING 命令 测试 海龟 的 初 什 
位 置 ， 然 后 把 这 个 位 置 参数 赋值 给 A， 具 体 如 何 去 赋 ， 这 要 
用 到 LOGO 语 言 中 的 命名 命令 ，MAKE。 

命名 是 LOGO 语 言 中 一 个 非常 重要 的 组 成 部 分 。 我 们 可 
以 给 过 程 命名 ， 如 让 海龟 画 一 个 正方 形 ， 我 们 给 它 取 名 为 
ZFX， 可 以 给 参数 命名 ， 如 为 了 画 出 不 同 边 长 的 正方 形 我 们 
给 过 程 ZFX 定 义 边 长 为 x。 除 此 之 外 ， 我 们 还 可 以 为 程序 中 
各 种 数据 命名 ， 旭 将 20 命 名 为 A， 在 计算 机 里 ， 每 一 个 变量 
如 同一 个 小 匣子 ， 把 20 命 名 为 A， 实 际 上 是 把 20 放 进 名 字 为 
和 A 的 小 匣子 里 面 ， 用 MAKE7A 20 这 条 命令 便 可 实现 。 
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因 些 ， 人 虹 玫 和 为 


ee = 


1 
MAKE“ 变 基 表达 式 
功能 是 :将 表达 式 的 值 由 给 恋 量 ， 或 疹 将 发 达 式 的 值 命名 


为 变量 ， 并 且 通 过 在 名 字 前 加 符号 ““” 来 表示 。 

MAKE 也 可 以 为 表达 式 命名 ， 从 击 实 现 运 贫 功 能 ， 
如 ， 

MAKE 7 A 4x#(3 十 2)/(3 十 2) 十 1 

PRINT :和 A 


屏幕 上 显示 出 ， 


这 里 PRINT  ，A， 是 输出 A 的 值 ， 显 然 ， 现 在 A 的 
什 即 为 表达 式 的 计算 结果 。 

现在 我 们 就 可 以 解决 前 面 提 出 的 问题 了 。 先 将 多 边 形 过 
程 列 出 

TO DBX :x :a 

IF _ HEADING-= :A STOP 


RT :a 

DBX :x :a 

END 

这 里 使 用 了 新 的 变量 A。 了 到 海 他 的 当前 位 置 为 A 的 
值 ， 而 A 的 值 代 表 海 危 原 来 的 起 始 位 置 。 但 是 我 们 并 没有 把 
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这 一 事实 告诉 学 习 机 ， 因 而 当 我 们 执行 这 段 过 程 ， 即 外 入 
DBX 50 90 上 时， 学习 机 就 会 发 出 出 错 信息 ， 意 思 是 没有 给 
则 六 的 恒 。 

现在 学 习 了 MAKE 命名 命令 ， 就 有 办 法 将 海 龟 的 原始 
朝 回 送 给 A 了 。 

MAKE 7A HEADING 

HEADING 表示 了 海龟 的 起 始 位 置 ， 为 了 和 吉 免 每 次 运 
行 时 都 要 健 入 以 上 命令 行 ， 我 们 最 好 将 它 写 入 过 程 中 ， 瑰 在 
我 们 将 画 多 边 形 过 程 取 名 为 DBX1， 

DBX1 :xx 3:a 

MAKE 7 A HEADING 

DBX :x ?:a 

END 

我 们 殷 这 个 过 程 分 析 一 下 ， 先 将 海龟 的 起 始 方向 了 王 A- 
DING 命名 为 A， 然 后 调用 子 过 程 DBX， 这 个 子 过 程 就 是 
我 们 刚才 叙述 过 的 过 程 ， 

TO DBX ,x :a 

IF _ HEADING= :A STOP 

DBX :x :a 

END 

这 样 ， 每 当 画 出 一 条 边 就 检查 当前 的 方 负 是 否 等 于 A 的 
值 ， 一 且 等 于 A 的 值 ， 即 起 始 方向 ， 过 程 便 停止 执行 。 

我 们 可 久 从 在 学 习 机 上 的 实际 操作 中 得 知 。 不 论 海 优 原 
来 在 什么 位 置 ， 从 什么 方向 开始 通 多 边 形 ， 都 能 够 在 画 出 一 
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个 完整 前 图形 后 准确 地 停 下 来 。 
87. 多 边 形 的 螺旋 线 


螺旋 线 和 多 边 形 有 亲缘 关系 。 螺 旋 形 可 以 看 成 为 生长 的 
多 边 形 。 其 过 程 如 下 : 

TO DBXL , 文 :8 

FED :xx 

RT :a 

DBXL :x 十 1 :a 

END 

取 x=1，a=45 得 图 3-41 取 x=1，a=90 得 图 3-42。 


图 3-41 5-42 
我 们 还 可 以 以 各 种 不 同 的 角度 作为 输入 数 来 运行 
DBXL， 当 螺旋 线 变 得 非常 大 时 ， 再 按 CTRL-G 键 ， 使 它 
停止。 
当然 ， 我 们 还 可 以 对 这 个 过 程 作 进一步 的 修改 ， 使 它 的 
巡 长 每 次 的 增 量 可 以 改变 。 我 们 用 变量 来 作为 增 量 
e。 89 。， 


TO DBXL1 :x :a :Y 

IE :x>70 95TOP 

FED :x 

了 TIT :a 

DBX1 :x 十 :7 :a :7 

END 

取 x=1，a 一 45，y=1 得 图 3-43 取 x=1，a 一 45， 


7 =3 得 图 3-44。 
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图 5-44 


38 .多 边 形 的 内 螺 线 


多 边 形 的 内 螺 线 的 形成 ， 是 靠 角度 的 变化 ， 即 使 多 边 形 
的 每 个 角度 数 不 断 地 增加 或 者 减少 。 过 程 如 下 ; 

TO DBXN :x :a :7 

FED :x 
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及 T，a 

DBXN :x :a 二 :yy :7 

END 

这 里 我 们 用 了 作为 角度 的 增 量 。 

当 我 们 在 电脑 上 去 执行 此 过 程 时 ， 出 现 的 情景 简直 使 你 
大 吃 一 惊 ! 如 图 3-45 僵 49。 


图 3-45 3-46 
DBXN 10 1 10 DBXN 10 10 10 


rn 


图 3-47 图 5-48 
DBXN 7 3 10 DBXN 7 5 10 


e。 9l1 。 


图 3-49 
DBXN 20 10 7 


39 .多 边 形 的 家 属 


多 边 形 是 一 个 大 的 家 族 ， 在 
这 个 大 家 族 中 每 个 “人 ”的 形态 
各 异 。 这 一 节 里 ， 我 们 再 例 举 一 
些 。 

多 边 形 的 变型 很 多 ， 如 图 
3-50、51、52。 其 过 程 为 

TO 2DBX :xl :al :Xs。 :as 

FED :xi 

了 人 工 :ali 

FED :xs 

RT :ay 
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3-50 
2DBX 30 60 60 214 


SC 
5-51 图 3-52 
2DBX 30 90 50 135 2CBX 25 190 50 200 
2DBX ;xl :al :X， :3% 
END 
这 里 我 们 采用 了 四 个 输入 参数 ， 使 图 形 又 有 了 一 些 新 的 
变化 。 
而 图 3-53、54 是 如 下 过 程 运行 的 效果 ; 


3-54 


TO 3DBX :x :a 

下 卫 :xx 

RT :a 

IF ;HEADING=0 STOP 

3DBX :a :x 

END 

注意 在 最 后 一 行 中 两 个 变量 交换 了 位 置 。 

图 3-55 一 58 也 都 是 多 边 形 家 族 的 成 员 ， 你 能 想象 出 它们 
的 画 法 吗 ? 
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五 、 圆 和 弧 组 成 的 图 案 


前 面 我 们 是 以 正方 形 、 三 角形 等 多 边 形 作为 例子 绘制 了 
形态 各 蜡 的 图 形 ， 现 在 我 们 要 让 海龟 在 圆 和 弧 的 领地 里 得 到 
充分 地 区 代 展 。 


40 .新 “部 件 ” 一 一 贺 和 弧 


圆 和 弧 在 绘图 中 贞 有 很 重要 的 位 置 ， 但 由 于 画 起 来 比较 
麻 琐 ， 因 而 LOGO 专 门 定 义 了 绘制 圆 和 弧 的 过 程 ， 它 们 存放 
在 磁盘 里 ， 需 要 时 ， 从 磁盘 调 入 内 存 ， 方 法 如 下 : 

人 刍 入 ，READ ”CIRCLES 

若 你 的 磁盘 上 确实 有 加 和 弧 的 过 程 ， 在 回 车 后 ， 便 会 听 
到 张 动 器 “ 呼 呼 ” 作 响 , 儿 秒 钟 后 ,屏幕 上 会 出 现 有 关 圆 的 过 
程 名 ，RCIRCLE 和 LCIRCLE 用 来 画 圆 ，R ARC 和 
LARC 画 网 的 1/4， 每 一 个 命令 后 须 跟 一 个 输入 数 一 一 要 画 
的 图 或 引 的 平 径 ， 如 图 3-59 是 不 同 半径 的 圆 ， 图 3-60 是 不 同 
半径 的 圆 和 弧 。 


O < O 2O 20 


如 果 你 的 磁盘 上 没有 园 租 引 过 程 ， 也 不 要 因此 而 犯 悉 ， 
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自力 更 生 写 一 个 图 的 过 程 。 

我 们 根据 让 海龟 每 前 进 一 人 小段 国 定 的 距离 ， 旋转 一 个 因 
定 的 小 和 角度， 一遍 一 遍 反复 地 进行 ， 当 海 怨 转 够 360 度 时 ， 
所 形成 的 轨迹 ， 就 成 为 一 个 圆 。 过 程 为 ， 

TO RCIRCLE 

REPEAT 360 [FD 1 RT 如 

END 

画 弧 的 过 程 实际 上 是 圆 过 程 的 一 部 分 ， 我 们 用 少 来 代表 
要 画 弧 的 度数 ， 则 

TO RARC :x :7 

REPEAT :y [FD ,xz RT1] 

END 

当 我 们 键入 RARC1 90 -时 , 便 画 出 右 四 分 之 一 圆 。 

以 上 过 程 虽 然 能 够 画 出 圆 或 弧 ， 但 是 进行 的 速度 太 慢 ， 
每 次 只 能 前 进一步 ， 旋 转 一 度 ， 实 在 太 麻 烦 了 ， 因 为 在 显示 
屏 的 精度 范围 内 ， 一 个 具有 20 条 边 的 有 规则 的 多 边 形 与 一 个 
圆 已 很 难 区 分 了 。 

我 们 可 以 用 画 出 36 边 形 的 过 程 来 代替 圆 过 程 

TO RCIRCLE :x 

REPEAT 36 [FD :x RT 10] 

上 END 

我 们 将 x 定 为 10， 这 样 运行 起 来 就 快 
了 10 倍 ， 其 效果 租 差 无 几 ， 若 把 海龟 隆 藏 
起 来 ， 速度 会 更 快 “ 图 3-61 ) 。 图 5-61 
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下 : 


4 .加 和 红 组 成 的 旬 守 


习 拉 已 会 画 圆 和 缴 了 ， 现 在 可 以 用 圆 和 弧 来 组 成 有 趣 
员 国 条 示 图 3-62 是 一 基 美 丽 的 
花 ， 花 辩 是 由 两 条 弧 〈 图 3-63 ) 
组 成 的 。 其 中 画 花 疾 的 过 程 如 


TO HUAB :zx 

RARC :x 60 

RT 120 

RARC :xx 60 

RT 120 

END 

从 过 程 我 们 可 以 看 到 肥 画 花 
必须 让 画 完 一 条 弧 后 转动 海 
再 函 出 同样 的 一 条 弧 来 。 这 


会 数 大 家 可 以 在 电脑 上 试 一 
大 概 可 画 出 许多 辟 瘦 不 一 的 花 辩 来 。 


图 3-63 


现在 我 们 要 用 六 个 同 往 指 花 辩 避 可 以 组 成 一 东 花 〈 图 3- 


TO HUA : 


REPEAT 6 [HUAB ,x RT 60] 


END 


当然 ， 也 可 以 根 说 和 肯 已 的 爱好 画 出 更 多 


的 花 准 ， 组 成 更 


9 97 。 


美丽 的 花茶 。 同 时 ， 如 果 有 兴趣 的 语 ， 还 可 以 给 它 加 上 枝 、 
叶 ， 威 为 一 枝 花 ， 进 开 所 成 一 束 花 或 一 个 花园 (图 3-65 ) 。 


35-64 图 3-65 


图 3-66 是 一 个 太阳 的 图 案 ， 它 是 由 一 条 条 “ 蛇 》 形 曲线 
〈 图 3-67 ) 组 成 的 。 


图 5-67 

“ 蛇 ” 是 由 左 ， 右 两 弧 相 接 而 成 的 , 其 中 LARC :x :y 
为 左 弧 过 程 。 
e 98 。 


个 9 SHE , 莹 

LARC :xx 90 

RARC :x 90 

LARC :x 90 

RARC :x 90 

END 

当 我 们 把 这 一 条 条 “ 蛇 ”， 旋 转 一 定 人 角度 ， 便 会 得 到 漂 
亮 的 太阳 图 案 〈 图 3-66 ) 。 

下 ,下 Y 区 

REPEAT 9 [SHE :x RT 160] 

END 

图 3-68、69 也 是 由 弧 组 成 的 。 


5-68 园 3-69 


42 .图 和 绰 的 自 旋 


圆 和 弧 也 同 多 过 形 一 洋 ， 可 以 自 旋 ， 而 且 圆 和 弧 自 旋 所 


ee 990 。 


绘 之 图 更 美 。 图 3-70、71、72 就 是 由 圆 过 程 经 过 旋转 而 得 


3-70 图 了- 六 

到 的 。 当 然 也 要 用 到 递归 技术 。 其 中 图 3-72 的 过 程 就 是 海 色 
每 画 出 一 个 圆 之 后 ， 让 它 转 过 20 度 ， 再 画 一 个 圆 ， 因 而 将 过 
保 取 名 为 UAZ :x， 过 程 如 下 ， 

TO UAZ :xX 

RCIRCLE :x 

RTIT 20 

UAZ :xx 

了 ND 

图 3-70 则 是 海 危 每 画 出 一 个 
圆 之 后 ， 让 它 前 进 一 小 段 距 离 ， 
百 画 下 一 个 圆 。 其 过 程 如 下 ; 

TO UAZ1 :xx 

RCIRCLE :x 

PU RT 90 FED 10 LT 90 PD 

可 人 ZE 
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END) 

我 们 还 可 以 列举 出 将 递归 技术 运用 在 作 圆 和 弧 组 成 的 图 
案 上 ， 产 生 许 多 有 趣 的 图 案 交 例子， 比如 我 们 可 以 通 一 双 狂 
眼睛 (图 3-73 ) 。 它 是 由 两 个 对 称 图 形 组 成 ， 先 画 出 其 中 的 
一 上 只， 然后 转动 180 度 产生 出 另 一 上 只。 过 程 为 

TO YAN1 :a 

IF :a>8 STOP 

CIRCLER :a 

YAN1 :a 十 1 

匡 ND 

苏 趾 圆 过 程 
CIRCLER :a 如 下 ， 

TO CIRCLER :a 

REPEAT 360/ :a [FD 2 RT :a] 

END 

当 我 们 键入 ，YAN1 2 -/, 便 会 在 屏幕 上 ， 画 出 其 中 
的 一 只 猫眼 ， 然 后 用 它 组 成 一 双 猫 限 ， 

TO YAN2 

YAN1 2 

RT 180 

YAN 2 

END 

圆 和 弧 有 到 过 自 旋 ， 或 者 其 它 组 合 还 可 以 产生 许多 奇妙 指 
画 案 求 (图 3--74、75、76、77)。 


国 3-74 5 -75 


六 、 盟 息 海 龟 和 动态 海龟 


LOGO 语 言 被 洽 为 “电脑 教室 里 的 国王 ”， 可 以 开发 儿 
童 的 智力 ， 培 养 孩 子 的 想象 力 。 那 么 几 岁 的 儿童 可 以 开始 学 
习 LOGO 语 言 呢 ? 回答 是 ， 幼 儿 园 五 六 史 的 小 朋友 就 可 以 坐 
在 计算 机 淮 做 一 些 适 合 他 们 年 龄 特征 的 题目 ， 这 就 需要 罕 长 
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在 数 师 去 创造 这 样 的 学 习 环 境 。 

本 章 久 “瞬息 海龟 ”作为 标题 向 年 幼 的 孩子 介绍 一 种 新 
藤 方 式 ， 即 不 需要 学 会 LOGO 命 令 、 输 入 玫 等 概念 性 的 知识 
就 可 以 直接 运用 海 怨 在 电视 机 屏幕 上 做 图 , 发挥 自己 的 想 缆 。 
同时 也 疝 家 长 和 教师 提供 此 类 程序 指 原 理 和 编程 方法 。 另 外 
以 “动态 海龟 ”为 标题 给 孩子 们 创造 一 个 新 的 电脑 天 地 一 一 
电子 游戏 。 通 过 锁 有 风 牙 的 游戏 使 孩子 们 爱 上 上 电脑， 并 在 教 
颇 玫 家 长 的 指导 下 能 不 断 地 创造 新 的 小玉 ， 到 进 完 郑 旧 的 游 
戏 ， 使 电脑 的 神秘 感 从 孩子 们 的 脑海 里 消失 。 


43 . 盟 息 海龟 


当年 幼 的 儿童 初次 接触 电脑 时 ， 要 让 凶 们 搞 清 楚 命 令 、 
廿 句 等 概念 兰 是 非常 困难 的 ， 而 如 果 证 他 们 利用 键盘 上 指定 
好 的 用 全 刍 来 直接 指挥 海龟 去 做 图 ， 却 是 轻而易举 就 可 以 办 
到 的 事情 ， 我 们 就 把 这 种 工作 方式 称 之 为 明 息 海龟 ， 给 以 下 
几 个 单 键 赋 于 车 的 内 究 ， 

区 | 键 ， 指 挥 海 怨 国 前进 10 步 ; 

民 ] 键 : 指挥 海龟 加 右 转 过 30 
度 ; 

回 键 ， 指 挥 海 怨 向 左 转 过 
30 度 ; 

四 键 ， 清 除 屏幕 。 工 站 一 

这 样 便 可 以 指挥 海 色 米 做 图 ““ “十 一 一 | 一 
了 。 注 总， 每 按 一 个 键 之 后 ， 不 图 573 
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总 按 回 车 键 。 做 完 一 电 图 之 后 ， 按 C 刍 可 以 将 屏幕 清除 于 
净 ， 准 备 作 新 图 。 

用 “瞬息 海龟” 作为 工具 ， 可 以 在 屏幕 上 画 出 任何 图 
画 。 图 3-78、79、80 便 是 小 朋友 们 用 “ 阴 息 海龟 ”绘制 出 


人 站 > 过 
4 ie 


3-79 3-80 


44， 用 “ 醋 息 海龟 ” 作 图 的 方法 


在 这 一 节 里 要 向 宗 长 和 数 师 介绍 如 何 建立 瞬息 海龟 作 图 
方式 ， 去 创造 一 个 适合 自己 的 孩子 和 学 生 学 习 电 脑 的 环境 ， 

上 一 节 里 我 们 介绍 了 所 谓 豚 息 海 鱼 作 图 ， 就 是 靠 键盘 上 
单 刍 输入， 每 一 个 键 代 表 一 个 动作 。 但 这 些 都 是 我 们 人 为 规 
定 的 。 我 们 之 所 以 这 样 规 定 是 选用 了 FORWARD(FD) 、 
RIGHTCRT)、LEFTGLT) 的 字 头 。 当 然 还 可 以 定义 更 多 
的 劳 能 键 。 那 么 如 何 让 计算 机 知道 某 一 个 键 按 下 去 后 要 执行 
什么 功能 呢 ? 这 就 是 瞬息 海龟 作 图 的 关 链 所 在 。 杰 解决 这 个 
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问题 ， 就 要 求助 于 LOGO 的 一 个 新 命令 ，READCHARA- 
CTEER 命 令 ， 此 命令 称 之 为 键盘 输入 命令 ， 
本 | 
READCHARACTER | 
| 
它 的 作用 是 等 待 你 从 键 稚 上 键入 一 个 字符 ， 当 计算 机 执 
行 到 READCHARACTER 语句 时 便 会 暂停 等 竺 你 从 键盘 
上 键入 一 个 字符 ， 不 需 紧 跟 RETURN ( 回 车 ) 接着 便 可 钠 
根据 你 的 程序 安排 向 下 执行 。 
下 面 我 们 便 本 以 给 出 瞬息 海龟 作 图 的 程序 了 ， 我 们 将 此 
过 程 取 名 为 SCHG， 
TO SCHG 
ML 
SCHG 
END 
其 中 ML 为 子 过 程 ， 其 内 容 训 下 ， 
TO ML 
MAKE "xxREADCHARACTER 
IF :x= “FFD 10 
IF :x= ?“RRT30 
IF :xz= 包 和 LT30 
IF :x= 7/C CS 
END 
这 就 是 使 明 息 海 怨 作 图 的 过 程 ， 它 的 结构 非常 简单 ， 首 
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先 调用 了 ML 这 个 子 过程 ， 然 后 再 调用 其 自身 。 

其 中 过 程 ML 的 作用 是 从 键盘 接收 一 个 单 链 之 后 ， 转 去 
执行 此 单 键 的 规定 动作 。 

过 程 的 第 一 行 是 给 按 下 的 任意 一 键 取 名 为 ， 接 收 键 起 
一 单 键 冉 于 x 。 然 后 检查 它 是 否 是 F、R、L、C 键 ， 若 昌 
F 链 ， 册 命令 海龟 前 进 10 步 ， 若是 了 键 ， 则 命令 海 他 加 站 
30 度 ， 若 是 工 键 , 则 命令 海龟 癌 左 转 30 度 ! 若是 C 键 , 则 清 : 
屏幕 。 若 按 这 四 个 键 之 外 的 任意 键 ， 则 屏幕 上 不 会 有 仁 可 反 
应 。 

当然 ， 我 们 还 可 以 定义 更 多 的 键 让 海龟 去 执行 更 加 完 
的 动作 ， 那 舟 是 在 过 程 ML 中 增加 相应 的 附加 条 售 便 可 以 实 
现 ， 如 你 可 以 用 键 命令 海 钨 抬 笔 ， 用 D 键 命令 海 龟 落 笔 ， 
用 2 键 指挥 海龟 画 出 一 个 小 正方 形 等 等 。 当 然 变 利用 我 们 前 
和 而 章节 里 已 定义 过 的 正方 形 过 程 CFX。 

以 下 三 行程 序 加 在 ML 过 程 中 END 前 ， 这 些 功能 就 加 
实现 了 ， 

下 芝 和 了 可 

IF ,xx= “D PD 

本 

孩 子 们 在 “于 海龟 ”过 程 中 的 任何 一 个 想法 ， 任 何 一 个 
新 的 建议 ， 宗 长 和 教师 都 不 要 放 过 ， 尽 量 地 满足 他 们 ， 不 断 
地 完善 、 修 改 “ 阴 总 海龟 ”过 程 ， 只 有 这 伴 ， 孩 子 们 的 创造 
力 才 会 得 到 充分 发 挥 。 

最 后 让 我 们 抛 回头 来 总 绪 一 下 瞬 奶 海 怨 的 作 图 方法 ， 
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四 首先 家 长 或 教师 根据 孩子 们 的 要 求 建立 SCHG 过 程 。 
@ 键 入 SCHG .。/ 将 瞬息 海龟 过 程 调 出 ， 给 孩子 们 讲 
清 规定 好 的 各 个 键 的 功能 ， 指 导 孩 子 在 屏幕 上 用 这 些 键 去 进 
行 创作 。 
辐 在 创作 过 程 中 ， 家 长 和 教师 要 不断 地 发 现 和 总 结 
.1G 过 程 不 够 完善 的 地 方 ， 尽 量 地 去 修改 此 过 程 。 


45 .动态 海龟 


孩子 们 大 概 都 十 分 喜爱 电影 或 电视 节目 中 的 动画 片 ， 如 
《大 灰 狼 和 小 白 免 》《 米 老 岂 和 唐 老 鸭 》 等 ,如 果 让 海 怨 作 
为 演员 ， 我 们 的 孩子 作为 导演 ， 自己 去 创作 动画 片 ， 那 一 定 
会 给 孩子 们 带 来 更 大 的 乐趣 。 

要 创作 动画 片 ， 就 要 想 办 法 使 海龟 像 有 生命 的 小 动物 一 
说 动 起 来 ， 而 我 们 的 小 导演 可 以 控制 它 运 动 的 方向 和 运动 速 
度 ， 还 可 以 控制 屏幕 的 颜色 ， 当 然 也 可 以 别出心裁 ， 让 小 海 
龟 突 然 跳 起 到 屏幕 的 某 一 位 置 。 若 我 们 的 小 导演 认为 海龟 累 
了 ， 也 可 以 让 它 休息 片刻 再 继续 活动 。 

我 们 也 可 以 让 动画 片 加 进 一 些 游戏 的 内 容 ， 比 如 让 海龟 
绕 着 圆 形 跑道 运动 而 不 出 办 ,等 等 。 这 些 都 是 属于 动态 海龟 的 
范畴 。 动 态 海龟 的 出 现 ， 又 会 给 孩子 们 的 海龟 课题 增加 更 丰 
富 多 彩 的 内 容 。 


46 .用 动态 海龟 作 图 的 方法 


在 “瞬息 海龟 ”中 ， 我 们 掌握 了 如 何 使 用 键盘 上 的 键 来 
。 107。 


控制 海龟 ， 如 按 国 键 ， 使 海龟 前 进 10 步 。 那 么 ,要 使 海龟 运动 
起 来 ， 就 要 使 海 色 不 间断 地 运动 。 因 此 ， 我 们 首先 要 编制 一 
个 过 程 ， 能 使 海 龟 不 断 地 运动 ， 我 们 给 它 取 名 为 运动 YUD， 
在 这 个 过 程 中 ， 我 们 要 给 出 运动 的 速度 " 。 过 程 如 下 ， 

TO YUD :V 

ED :V 

YUD :V 

END 

执行 这 个 过 程 就 使 海龟 不 间断 地 前 进 。YUD 10 ./ 玫 
示 以 每 次 10 步 的 速度 迈 大 步 “中 ”来 。 而 YUD 5 </ 表示 
放 慢 速度 “ 走 ”。 这 样 我 们 的 “动画 片 ”完成 了 第 一 步 一 一 
使 “演员 ”海龟 动 了 起 来 ， 下 一 步 就 要 实现 如 何在 导演 的 控 
制 下 完成 各 种 动作 。 

这 就 要 求助 于 “瞬息 海龟 ”中 ，MEL 子 过 程 了 。 在 瞬息 
海龟 过 程 的 ML 子 过 程 中 ， 我 们 用 到 了 READCHAR 
ACTER 命令 ， 它 的 作用 是 等 待 键盘 输入 一 个 字符 。 现 在 我 
们 要 使 海 优 不 间断 运行 而 能 接受 控制 ， 就 是 说 如 果 从 键盘 上 
键入 一 个 字符 使 海龟 对 表示 的 内 容 作出 响应 ， 而 如 果 什 么 也 
不 键入 ， 海 龟 仍然 能 维持 原来 的 动作 。 在 LOGO 语 言 中 ， 要 
半 RC? 命 令 来 实现 


RC ? 


它 的 作用 是 根据 是 否 已 键入 字符 分 别 输 出 TRUE 条 
”108。 


FALSE。 
现在 我 们 可 以 写 出 动态 海龟 的 子 过程 ML， 
TO ML 
MAKE “xz READKEY 
IF :x= “R RT 30 
IF :xz= 外 LT30 
END 
在 程序 的 第 一 行 中 调用 了 READKEY， 这 是 一 个 过 


程 ， 它 的 作用 是 如 果 键 入 一 个 字符 ， 则 输出 的 就 是 那个 字 
符 ， 香 则 什么 字 也 不 输出 。 


TO READKEY 

IF RC ? OUTPUT READCHARACTER 

OUTPUT7 

END 

将 子 过 程 ML 加 入 动态 海龟 过 程 YUD :Y 中 ， 便 可 以 在 
运动 中 控制 海龟 的 行动 了 

TO YUD :V 

FD :V 

ML 

YUD :V 

END 

当然 ， 事 先 要 建立 起 子 过 程 ML 和 ML 的 子 过程 READ- 
KEY。 

现在 我 们 的 动画 “演员 ” 海 印 可 以 在 小 导演 的 控制 之 下 
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自由 行动 了 ， 但 总 觉得 这 样 的 动画 片 似 乎 有 些 过 于 呆板 ， 演 
员 仅 仅 会 前 进 和 疝 左 向 右 转 ， 能 不 能 再 生动 一 些 呢 ? 比如 你 
想 让 海龟 前 进 的 速度 越 来 越 快 ， 或 者 相反 ， 又 比如 你 想 根据 
自己 的 愿望 来 改变 画笔 的 颜色 ， 等 等 。 这 些 功 能 的 实现 ， 要 
通辽 改变 ME 过 程 驻 完成 ， 

我 们 先 写 出 改变 海龟 前 进 速 度 的 程序 行 : 

IF :x= “AMARKE YV :Vd+1 

IFE :x= “B MAKE V :V 一 1 
这 样 当 我 们 键入 A 或 B 键 后 ， 海 旬 便 会 以 每 次 递增 一 步 或 者 
递减 一 步 的 速度 来 运行 。 

改变 表 笔 颜色 的 办 法 之 一 是 使 用 数 ， 

IE :x= 一 0 PC 0 

FE :x= 一 1 PC TI 

当 键入 数字 0 键 之 后 ， 通 笔 为 虹 色 ， 当 键入 1 刍 ， 画 笔 
变 为 绿色 。 当 然 我 们 还 可 以 设计 其 它 的 颜色 。 

通过 不 断 完善 ML 过 程 ， 动 画 片 就 会 越 来 越 生 动 了 。 

芝 后 我 们 还 可 以 用 型 态 海龟 设计 一 些 游戏 。 如 我 们 可 以 
在 屏 蒂 上 画 一 个 环形 “跑道 ”， 让 孩子 们 驱赶 动态 海龟 绕 跑 
道 一 轿 ， 以 撞 跟 道 边 的 次 数 最 少 为 胜 ， 那 将 更 加 有 趣 。 
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这 一 章 我 们 准备 从 解决 实际 问题 入 平 ， 找 知识 的 深浅 分 
阶段 ， 深 入 浅 出 地 介绍 BASIC 语 言及 编程 技巧 。 

BASIC 语言 是 众多 程序 设计 语言 中 运用 比较 普 沁 的 一 
种 ， 适 合 初学 考 使用。 其 一 ， 它 简单 ， 并 且 使 用 范围 广 ， 目 
前 大 部 分 教学 辅助 软件 痢 是 用 BASIC 语言 编写 ;其 二 ， 它 
直观 性 强 ， 具 有 计算 人 答 ， 使 用 
方便 。 

学 会 使 用 BASIC 语言 编写 程序 ， 不 但 可 以 解决 身边 的 
实际 问题 ， 兴 生 于 大 隐 员 总 汉 二 发 个 人 入 主观 能 动 性 和 创 
造 力 。 编 写 一 个 较为 复杂 的 程序 ,一 百 个 人 如 果 分 别 狸 立 进 行 
程序 设计 ， 编 出 的 程序 虽然 帮 达 ee 却 可 能 
没有 某 两 个 程序 是 完全 相同 的 ， 这 说 明 由 于 每 个 人 的 思路 不 
网 ,也 说 明 程 序 设 计 本 屿 存在 着 灵活 性 和 创造 性 ,从 而 全 个 人 
的 才智 得 以 发 挥 。 另 一 方面 ， 编 制程 序 的 本 身 就 是 进行 着 结 
构 性 思维 和 系统 性 恩 维 的 锻炼 ， 从 而 可 凡 培 养 科 学 性 的 思维 
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方法 ， 还 基 让 我 们 拿 电 这 把 智 慧 的 钥匙 ， 尽 快 打开 知识 宝库 
的 大 门 。 


一 、 初 步 的 程序 设计 


下 面 我 们 通过 解决 几 个 实际 问题 ， 掌 握 BASIC 的 基本 
语句 ， 学 会 初步 的 程序 设计 。 


47 ,一 个 程序 的 热 行 过 程 


(1) 先 把 内 存 赔 器 清理 干净 

就 像 我 们 每 次 写字 之 前 要 把 黑板 氛 干 浆 一 样 ， 在 疝 学 习 
机 送 入 程序 之 前 ， 也 必须 把 内 存 贮 器 清除 于 净 ， 否 则 ， 原 来 
内 存 贮 器 中 的 上 昌 程 序 和 新 键入 的 程序 混杂 在 一 起 ， 计 算术 执 
行 起 来 就 会 乱 套 。 

所 以 ， 我 们 必须 养 成 一 个 习 愤 ， 在 送 入 一 个 新 的 程序 之 
前 ， 首 先 键入 ，NEW 命令 

方法 是 依次 按 N、 忆 . W 三 个 英文 字母 ， 再 拨 |RETURN 
〈 回 车 键 ) 。 

这 时 内 存 中 的 东西 就 被 清除 干 光 了 ， 但 屏幕 上 并 没有 什 
么 反映 一 一 对 程序 的 执行 没有 什么 影响 。 如 果 恢 也 想 招 屏幕 
撮 得 于 干净 净 ， 就 请 键入 ， 

HOME 

这 时 屏 状 上 就 什么 也 没有 了 ， 只 有 一 个 光标 在 左上 角 闪 
烁 ， 告 诉 你 现在 可 以 输入 程序 了 。 
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(2 癌 学 习 机 送 一 个 程序 

下 面 让 我 们 一 起 来 将 一 肛 程 序 送 入 学 习 机 。 圳 室 格 的 地 
方 一 定 要 找 键 盘 下 方 最 长 的 那个 键 一 一 空格 键 ， 每 一 行 结束 
都 要 键入 ETURN | 键 。 

10 PRINT “Ay”5 

20 PRINT “By?”y 

30 PRINT “Cy? 

40 END 

在 这 个 程序 中 我 们 可 以 看 出 ， 一 个 程序 是 由 若干 条 语 名 
组 成 的 ， 每 一 条 语句 的 第 一 段 为 号 码 ， 称 为 透 句 标号， 它 必 
须 是 正 整数 ， 它 告诉 学 习 机 执行 的 顺序 。 在 正常 情况 下 ， 学 
习 机 总 是 从 语句 标号 小 的 向 语句 标号 大 的 方向 执行 ， 相 邻 语 
名 行 之 间 语 名 标号 要 六 有 一 定 指 间 陋 ， 这 是 为 了 在 修改 程序 
时 插入 新 的 语句 。 

除 语句 标号 外 ， 其 余部 分 为 语句 体 ， 它 包括 语句 定义 符 
和 语句 体 。 语 句 定义 符 是 规定 计算 机 执行 某 一 特定 的 功能 ， 
如 10 号 语句 中 的 PRINT， 就 称 为 语句 定义 符 ， 它 的 功能 是 

学 习 机 屏幕 显示 结果 或 者 是 将 结果 送 打印 机 。 

语句 体 是 规定 语句 定义 符 要 执行 的 具体 内 容 ， 上 面 程序 
第 10 行 语句 中 ，“A”， 就 为 语句 体 ， 它 前 面 的 语句 定义 符 
PRINT 是 要 求 将 结果 送 屏幕 显示 ， 即 显示 字符 A。 

上 面 我 们 每 键入 一 行程 序 后 按 回 车 键 ， 就 将 这 行程 序 送 
入 内 存 , 当 最 后 一 个 “ 回 车 ?键入 之 后 ,程序 便 全 部 进入 内 存 。 

(3》 列 程序 清单 和 修改 程序 
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四 若 要 检查 内 存 现 有 的 程序 ， 可 键入 

二 TS9 开 志 

这 时 屏幕 上 会 显示 出 学 习 机 内 的 全 部 程序 。 如 果 只 需要 
显示 20 到 40 号 语句 之 间 的 部 分 程序 清单 ， 可 键入 命令 LIST 
20，40 <-/， 这 时 屏幕 上 显示 20 到 40 号 语句 的 内 容 。 

@@ 修 改 程序 ， 

A .在 输入 程序 过 程 虽 修改， 在 一 个 程序 输入 过 程 中 还 
未 按时 车 键 之 前 , 发 现 有 错字 符 央 ， 可 用 | 包 健 〈 退 格 键 求 
修改 。 它 如 园 橡 皮 一 样 ， 每 挝 一 次 键 ， 就 探 去 一 个 字符 。 

B .输入 内 存 后 程序 的 修改 ， 芳 送 完 一 行程 序 并 按 过 回 
车 键 时 发 现 有 错误 ， 可 以 重 独 将 诛 语 名 行 抽 正确 的 键入 一 
迪 ， 由 同一 行 号 原 有 了 内容 便 被 新 键入 的 内 容 所 代 灰 。 也 可 以 

用 键盘 编辑 键 进 行 修改 ， 具 体 方 法 人 参看 第 五 章 。 若 取 删 除 一 
行程 序 ， 可 抄 谈 行程 序 继 号 再 国 车 ， 该 行 即 狂 删 除 。 

(4) 运行 程序 

存 后 并 不 意味 着 它 会 自动 运行 ， 必 须 在 程序 

RUN 。/) 

程序 便 开 始 运行 。 如 果 是 我 们 刚才 键入 的 程序 ， 出 屏 医 
二 便 出 现 ， 

ABC 

这 便 是 我 们 上 面 程序 的 执行 结 蛙 

车 程序 有 错误 ， 在 执行 过 程 中 会 自动 打出 错误 谷 息 ， 在 
改正 错误 之 后 ， 才 能 重新 运行 。 
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48 .让 学 习 机 来 为 我 们 贫 题 
一 一 介绍 由 值 语句 工 匡 工 


在 让 学 习 机 做 上 题 之前， 必须 要 把 一 些 概念 和 计算 幸 语 言 
中 的 规定 摘 浅 。 

(1) 内 存单 元 、 变 量 和 数据 

计 CA 多 记忆 的 小 盒子 一 样 ， 这 一 个 
个 小 盒子 就 叫做 具 存 时 元。 还 证 学 习 机 做 题 ， 必 须 先 把 数 
和 Re 村 给 这 个 内 存单 元 起 个 名 字 ， 
岂 变 量 名。 单个 变量 叫 简 ; 二 它 的 名 字 可 以 由 一 串 字 母 
秋 数 字 Re 但 是 第 一 个 字符 必须 是 字母 ， 比 如 :，A、B2 等 
等 。 

变量 又 分 为 数值 变 虽 利 字 符 吕 变量。 上面 举 的 两 个 变量 
名 就 为 数值 变量 台 ， 数 值 变量 可 以 参加 算术 和 运算、 加 辑 运 鼻 
和 关系 运算 ， 它 的 值 是 县 伺 鸭 煞 据 ， 而 字符 串 变 量 移 值 是 一 
吕 字 符 ， 它 主要 用 于 文 和 学 描述。 字符 凡 变 量 名 由 煞 值 变量 名 
之 后 加 一 个 “ 训 ” 符 号 组 成 。 如 ， 人 和香 ，3B1 出 舌 。 

(2) 给 恋 We 一 一 二 了 了 语句 

可 直接 给 变量 赋 东 前 语句 工 ET， 要 想 让 学 习 相 做 题 ， 
首先 应 该 把 数据 送 入 尝 习 机 ， 也 就 是 要 先 给 变量 同人 息 ， 

10 LET A=3 

20 工 ET A 囊 =“A 人 BC” 

30 PRINT 和 A 

40 了 RINT 作 岂 


50 END 

键入 RUN ./ 

屏幕 显示 

3 

ABC 

这 就 吉明 人 A 单 元 里 压 入 3 ，A 出 单元 里 间 入 ABC。 
ee 语句 中 ， 工 ET 是 语句 定义 符 ， 表 示 给 变量 局 值 。 
语句 体 ， 霄 示 将 3 送 入 变量 为 A 的 单元 里 。 

， 当 你 需要 数据 时 可 以 随 有 时 
取出 。 如 将 A 中 的 数据 3 取出 , 它 仅 仅 是 复制 品 ， 名 字 为 A 的 
小 盒子 里 仍然 保留 着 3 ， 除 非 有 新 的 数据 装 入 ， 才 能 将 3 履 

再 看 下 面 的 程序 ， 

10 LET A=3 

20 LET B= 和 A 

30 LET A=5 

40 PRINT A，B 

RUN .7) 

5 3 

上 上 面 程序 中 ， 先 将 3 巾 给 变 景 A， 再 将 A 的 值 赋 于 B， 
因为 A 中 仍 保留 3 ， 所 以 了 B 的 值 为 3 ， 又 将 5 赋 于 A， 这 时 
A 里 的 3 就 被 5 代 灰 ， 因 此 A 的 值 就 变 为 5 。 

LET A=3 并 不 表示 A 等 于 3。 如 A=A+l1 ， 这 在 
数学 里 是 讲 不 通 前 ， 而 在 BASIC 语言 里 却 有 实际 的 意义 ， 
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表示 将 A 这 个 单元 的 内 容 加 上 1 之 后 ， 再 存 入 A 单元 。 鲍 
如 ， 刚 才 A 单 元 里 为 3 ， 那 么 将 3 取出 之 后 再 加 上 上 1 送 入 
A， 现 在 A 就 变 成 为 4。 

总 结 一 下 LET 语句 的 格式 ， 


行 号 LET 变量 = 表达 式 


意思 是 将 等 号 右边 的 表达 式 的 结果 赋值 给 等 号 左边 的 变 
量 。 

(3) BASIC 语言 中 的 算术 表达 式 

BASIC 语言 中 的 算术 表达 式 与 数学 中 的 略 有 不 同 ， 列 
于 表 4-1。 


数学 表达 式 举例 BASIC 妆 达 式 举例 


4 十 0 4 十 召 

q 一 -4 一 悍 

ab 4*+ 卫 

ao- /了 

G3 4 人 3 

“7 (4+B)/(3s*C) 
5[(a 一 5)\a 十 b) 5*((4 一 5)* (4 十 刀 )) 


人 = ar MrrrrTarpagkparEorrmarr 二 


ev 


出 表 人 -1 可 以 看 由 BASIC 表 达 式 中 只 准 用 加 括号， 乘 


MY- 


号 不 能 省 略 ， 一 律 要 用 “* ”， 乘 方 要 用 “和 人”， 
(4) 让 学 习 杭 为 我 们 做 题 
-- 切 工作 准备 就 绪 ， 下 面 开 始 让 学 习 机 为 我 们 做 题 了 。 
题目 是 ， 求 圆 管 的 乌 积 (图 4-1) 。 其 中 a=6 寿 米 ， 
0 盖 5 厘米 ，c=100 原 米 


体积 公式 为 太一 工 ( 吧 一 六 )c。 


程序 如 下 ， 

10 HOME 

20 工 ET A=6 

30 LE B== 

40 LET C=100 

50 LET V=(3.14/4) *(AA 人 2 一 BA 人 2)*C 
60 PRINT“V=”3 V 


70 END 
RUN 
这 时 屏幕 显示 如 下 
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YY 一 863 .5 

需要 说 明 的 是 ，50 号 语句 是 将 计算 出 圆 管 体积 赋 于 厂 ， 
其 公式 中 的 用 3 .14 代 替 ， 则 是 因为 学 习 机 并 不 知道 z 的 
值 ，60 号 语句 是 显示 矿 值 8$ 70 号 语句 表示 程序 结束 。 


49 .让 学 习 机 打印 一 张 课程 哨 
一 一 介绍 INPUT 语 各、PRINT 语 名 和 人 TAB 冰 数 


(1) 键盘 输入 语句 INPUT 

前 而 我 们 介绍 了 直接 赋值 语句 LET ， 并 让 学 习 机 用 它 
做 了 一 道 计算 圆 管 体积 的 数学 题 。 假 如 我 们 想 要 改变 一 组 参 
数 去 求 圆 管 的 体积 ， 就 要 修改 程序 ， 将 三 个 LET 语句 中 的 
语句 体 一 一 改动 ， 比 较 麻 烦 。 那 么 ,有 没有 更 简便 的 方法 呢 ? 
利用 键盘 输入 语句 INPUT 直接 从 键盘 接收 数据 就 是 简便 方 
法 中 的 一 种 。 

让 我 们 用 ;INPUTG 语句 将 上 面 例题 改写 一 下 ， 

10 HOME 

20 JNPUT A 

30 INPUT B 

40:1INPUT C 

50 ET Y=(3.14/4) (AAA 人 2 一 BA2) *C 

60 了 RING “Vs 二 

70 世 ND 

RUN 。/ 

屏幕 上 出 现 一 个 “9? ，" 

3 于 19。 


这 是 程序 运行 到 20 号 语 名 INPUT A， 学 习 机 就 在 等 竺 
大 从 键 副 上 键入 一 个 数 央 于 A 。 当 我 们 键入 一 个 具体 的 数值 
并 回 车 后 ,学 习 机 便 自动 地 将 此 数 赋 于 A ,并 继续 往 下 执行 ， 
这 时 屏幕 上 又 出 现 一 个 问号 ， 是 在 等 待 从 键盘 上 送 入 一 个 数 
值 赋 于 B 。 

这 样 ， 要 想 随 时 更 换 一 组 参数 ， 只 要 重新 运行 一 下 该 程 
序 ， 当 屏幕 出 现 问号 ， 键 入 新 的 数值 即 可 。 

为 了 在 操作 时 能 够 分 清 遇 到 一 个 问号 是 要 给 哪 一 个 变量 
赋值 ， 以 免 出 错 ，INPUT 语句 可 以 带 有 提示 信息 。 

如 20 语 名 加 上 提示 信息 为 ， 

20 INPUT “A=，”，A 

运行 时 屏幕 出 现 “A=? ”， 使 我 们 很 清楚 该 为 哪个 变 
量 赋值 。 

一 个 INPUT 语句 可 以 给 几 个 变量 赋值 ， 变 量 与 变量 之 
间 要 用 “，” 分 制 。 在 用 键盘 输入 数值 时 ， 数 值 与 数值 之 间 
也 要 用 “，” 分 割 。 

如 上 面 程 序 20、30、40 号 语句 可 以 合并 为 一 条 语句 ， 

20 INPUT A，B，C 

这 样 顺序 键入 三 个 数值 分 别 赋 于 A，B， C， 注 意 次 序 
不 能 摘 混 。 

另外 ，INPUT 语句 在 从 键盘 向 变量 赋值 时 只 能 键入 具 
体 数值 ， 不 能 键入 表达 式 ， 从 这 一 点 来 说 ，INPUT 语句 并 
不 能 完全 代替 LRT 语句 。 

INPUT 语句 的 格式 ， 
es。]20。 


aperrr -ed oprArnIoTprwrmreeoeioy TI -nen Et 


行 号 INPUT 变量 ， 变 量 …… 


或 


行 号 INPUT “提示 信息 ”， 变量 ， 变 量 …… | 


(2) 输出 语句 PRINT 

前 面 我 们 已 经 用 到 PRINT 语句 ， 它 的 作用 也 很 明显 ， 
输出 运算 结果 ， 同 时 也 可 以 用 于 键盘 计算 。 

所 谓 键 盘 计算 ， 就 是 可 以 将 学 习 机 当 作 计 算 器 来 使 用 ， 
其 方法 如 下 ， 

键入 

PRINT 3 上 +5 

屏幕 点 立即 出 现 8 

再 键入 

PRINT (3 十 2 十 5)/2 4 

将 显示 

5 

这 种 方式 称 为 立即 执行 方式 ， 它 没有 行 号 ， 回 车 后 就 立 
即 执行 ， 用 LIST -来 显示 时 看 不 到 任何 东西 ， 因 为 它 不 是 
程序 行 ， 并 没有 记 入 内 存 。 

PRINT 语句 有 多 种 功能 ， 请 看 下 面 程序 ， 

10 X 一 1000 


“于 21。 


20 PRINT xx 

30 PRINT 

40 PRINT 一 6 

30 PRINT “ABCD” 

60 PRINT 30 十 式 

70 END 

RUN ./ 

屏 藉 显示 ; 

1000 ”显示 变量 的 值 
显示 一 空 行 

一 6 显示 一 常数 值 

ABCD 将 字符 串 常 量 原样 显示 

1030 ”计算 并 显示 表达 式 的 结果 (x 的 值 为 1000 与 30 
相 加 ) 

以 上 是 PRINT 语句 的 一 般 格 式 ， 它 还 能 将 运算 结果 以 

多 种 格式 输出 。 
人 标准 格式 ， 看 下 面 程序 。 
10 PRINT 5，6，7，8 


20 END 

RUN -2/ 
5 6 7 
人 人 

千 工 列 第 17 列 第 33 列 
8 


上 面 的 输出 格式 就 为 标准 格式 ， 程 序 中 待 显 示 项 之 间 用 
”22。 


“，” 分 测 ,显示 时 ,将 屏幕 40 列 分 为 三 耻 ， 第 一 段 从 第 1 列 
至 第 16 列 ， 第 二 段 从 第 17 列 至 32 列 ， 第 三 段 从 第 33 列 至 40 
列 ， 若 街 显示 项 为 多 于 3 个 ， 转 下 一 行 第 一 段 首位 ， 上 面 10 
导语 名 的 输出 正 是 按照 此 规定 。 

@@ 紧 幅 格 式 ， 看 下 面 程序 。 

10 PRINT 19， 87 

20 PRINT “AA” “BB”3 “CC” 

30 END 

RUN ./ 

1987 

AABBCC 

以 上 显示 就 为 紧 次 格式， 语句 中 待 显示 项 之 疼 用 “ ” 
分 割 ， 输 出 时 项 与 项 之 间 没 有 间隔 ， 紧 挨 在 一 起 。 

C ,不 换行 格式 ， 刹 下 面 程序 。 

10 PRINT 1，3， 


20 PRINT 5 

30 PRINT 2 4 

40 PRINT 6 

50 眉 ND 

RUN -7/ 

屏幕 显示 

1 3 5 
246 


由 于 10 号 语句 来 尾 有 “，”， 斯 以 20 号 语句 显示 项 不 换 
”123。 


行 ， 显 示 在 第 三 毁 33 列 上 ， 又 由 于 20 号 语句 末尾 没有 任何 符 
导 ， 所 以 30 号 语句 显示 时 换行 :同样 ，3 0 号 语句 来 尾 有 
“和 ”， 所 以 后 面 不 换行 按 紧凑 格式 显示 。 

(3) 输出 格式 函数 一 -TAB 函数 

尽管 PRINT 语句 可 以 将 结果 以 多 种 格式 输出 ， 但 假如 
我 们 想 将 字符 或 数字 显示 在 预定 位 置 ， 它 就 难以 办 到 ， 这 只 
有 依靠 TAB 函数 来 实现 。 如 ， 

10 HOME 

20 PRINT TAB(2); “星期 一 ”5 TAB(10)8 “语文 ? 

30 END 

RUN ./ 

屏幕 显示 

星期 一 语文 

第 第 第 
而 尖 丽 

由 上 例 可 以 看 出 ，TAB 函 数 的 使 用 格式 为 ; 

PRINT TAB 表达 式 1 ) ， 输 出 项 1 TAB (表达 
式 2 )， 输出 项 2…… 

其 中 ， 表 达 式 的 值 规定 了 输出 项 的 起 始 位 置 ( 其 值 不 能 
是 负 值 ) 。 一 个 PRINT 语 名 可 用 几 个 TAB 函数 ， 但 中 间 要 
以 ”分割 ， 并 且 其 值 只 能 从 小 到 大 排列 ， 否 则 这 个 函数 
无 效 ， 只 作 紧 资格 式 处 理 。 若 其 值 为 小 数 ， 则 计算 机 自动 取 
整 ， 如 2.5 作 2 处 理 。 

(4) 学 习 机 开始 打 课 程 表 
.124。 


现在 我 们 可 以 共同 来 完成 打印 课程 表 的 工作 。 


课 程 表 


于 | 自习 | 活动 | 自 司 | 活动 | 自习 | 活动 

程序 如 下 ， 

10 PR 村 

20 PRINT TAB(15)，“ 课 程 表 ? 

30 PRINTT on 

40 PRINT TAB(5)8 “一 ”， TAB(I1)》 “二 ”3 
TAB(17); “三 ?2 TAB(23) “四 ”5 TAB(29); 
“五 ”4 个 AB(35)8 “六 ?” 

50 PRINT TAB(2)》 “一 ”， 个 AB(5)5。 “语文 ? 4 
TAB(11)。， “数学 ”TAB(17);， “语文 ”， 个 A 瑟 
(23)3 “数学 ”TAB(29);， “语文 ”， TAB (35)》 5 
“数学 ， 


80 


9 


;125 ， 


将 这 个 程序 接着 做 下 去 ， 就 可 以 打印 出 一 张 课程 表 来 。 
其 中 第 10 号 语句 是 连接 打印 机 ， 这 祥 就 可 以 将 上 面 程序 
和 输出 结果 送 到 打印 宙 去 打印 了 。 
50. 计 算数 列 前 几 项 立方 的 和 
一 一 介绍 读数 语句 人 EAD， 置 数 语句 DATA， 恢 
复数 据 区 语句 RESTORE ， 无 条 件 转移 语句 
GOTO 
(1) 读数 语句 READ 和 置 数 语句 DATA 
前 夯 已 经 介绍 了 两 种 赋值 语句 ， 直 接 赋值 语句 LET 和 
键盘 输入 语句 INPUT。LET 语句 一 次 只 能 为 一 个 变量 赋 
信 ，INPUT 语句 虽然 能 为 多 个 变量 赋值 ， 但 这 就 要 占用 大 
量 的 时 间 。 为 了 解决 这 个 问题 ，BASIC 为 我 们 提供 了 用 于 
成 批 变量 赋值 的 语句 一 READ 和 DATA 语 名 。 
我 们 先 看 下 面 一 段 程序 ， 从 这 个 例子 里 可 以 体会 到 
READ 和 DATA 语 名 的 功能 。 
[ 例 ] 计算 下 面 数 列 的 和 :，2，5，46，65，87，103 
程序 如 下 ， 
10 HOME 
20 READ A，B，C，D，E，F 
30 LET.S=A+B+C+D 二 匡 十 F 
40 PRTNT 5 
50 DTAT 2，5，46，65，87，103 
60 END 
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由 上 画 的 程序 我 们 可 以 看 出 ，READ 和 DATA 语 名 的 
赂 式 ， 

人 行 号 》 READ 变量 1 ， 变 量 2 “变量 吕 

| 人 行 号 DATA 数值 1， 数 值 2 … 数 信 ? 


cr 


READ 语句 中 ， 变 量 与 变量 之 间 要 用 “， ” 分割 ， 
DATA 语 名 中， 数值 与 数值 之 间 也 要 用 “，” 分 割 ， 注 意 最 
后 不 能 有 标点 符号 。 

BASIC 语 言 专门 为 DATA 语句 开导 了 一 个 存 贮 煞 据 的 
数据 区 ， 当 DATA 语 句 输入 后 ， 该 程序 运行 结束 , 按 回 车 键 
后 即 按照 输入 的 先后 次 序 排列 ， 存 贮 在 数据 区 里 所 以 与 写 
程序 的 行 号 无 关 ， 可 以 放 在 程序 的 任何 位 置 。READ 语 名 
是 执行 语句 ， 在 程序 运行 过 程 中 遇 到 READ 语句 ， 就 按照 
赛 量 的 先后 次 序 ， 从 数据 区 读 对 应 的 数值 。 我 们 可 以 认为 数 
据 区 设 有 一 个 指针 ， 开 始 时 指针 指向 第 一 个 数值 ， 读 过 一 个 
数值 之 后 指向 下 一 个 数值 。 前 一 个 DATA 语句 行 读 完 之 后 
了 渎 下 一 个 DATA 语句 行 的 数值 。 所 以 ，DATA 语 名 可 以 分 
桥 儿 个 程序 行 来 号 。 但 是 在 DATA 语句 中 的 数值 只 能 是 常 
数 ， 不 能 是 分 数 和 表达 式 等 。 同 时 ，DATA 语句 忠 的 数值 类 
型 必须 和 READ 语 句 中 的 变量 类 型 一 致 。 若 READ 语句 中 的 
变量 为 字符 型 ， 如 A 闻 ， 那 么 在 DATA 语 句 申 的 数值 一 定 也 
机 是 字符 型 ， 因 此 数值 项 要 用 “  ” 括 起 来 ， 如 “C”。 

另外 ,DATA 语 名 中 的 数值 个 数 不 得 少 于 READ 语 名 中 
庶 量 的 个 数 ， 否 则 在 程序 执行 过 程 中 将 产生 涩 据 不 足 的 错 
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误 。 

(2) 恢复 数据 区 语句 (RESTORE) 

我 们 君 下 面 一 段 程序 ; 

10 READ A，B，C 

20 DATA 4，5，16 

30 READ X，Y，4 

40 DATA 4，5，6 

50 PRINT “A=” A,“B=”; B,“C=”， C 

60 PRINT-“X=” X，“Y=”Y，.“Z=”: 国 

70 了 ND 

RUN ./ 

A 王 4 只 一 5 C 一 6 

又 一 4 YY 一 5 Z 一 6 

我 们 看 ，A，B，C 和 X，Y,Z 所 读 的 数据 相同 ,那么 先 
们 能 不 能 让 它们 共用 一 个 数据 区 ， 在 读 完 A，B，C 的 数据 
之 后 让 数据 区 的 指针 恢复 在 数据 区 的 前 面 呢 ? 答案 是 ， 可 以 
的 。 这 就 要 用 到 我 们 下 面 要 介绍 的 恢复 数据 区 语 名 RES 人 
ORE。 

它 的 格式 是 ， 


ai 


行 号 RESTORE 


我 们 用 RESTORE 语句 将 上 面 程序 进行 改写 ， 
10 READ A，B，C 
， 128 。 


20 RESTORE 
30 READ X，Y，2Z 


40 PRINT “A=”，A，“B=”;， B，:Cr”4 C 
50 PRINT =，，X， csY=，y，Y，“=w 3 Z 
60 DATA 4，5，6 

70 .END 

RUN 。./ 


A=4 B=5 C=6 

又 一 4 Y=5 Z =6 

由 输出 结果 可 以 看 出 RESTORE 语句 起 了 作用 。 它 将 
数据 区 的 指针 恢复 在 前 面 了 。 使 用 了 RESTORE 语句 ， 可 
以 减少 数据 的 书写 次 数 ， 同 时 也 节约 了 内 存 空间 

有 时 候 我 们 并 不 一 定 希望 将 数据 区 指针 恢复 到 指向 第 一 
个 数据 ， 而 只 想 恢 复 某 儿 个 数据 ， 则 可 采取 以 下 方法 ， 

如 果 我 们 想 把 4，5，6，7，8 五 个 数据 前 三 个 赋 给 变量 
A，B，C， 后 三 个 赋 给 X，Y，2Z 


写 出 下 列 程序 ， 

10 READ A，B，C 

20 RESTORE 

30 READ I，J，X，Y，2Z 

40 PRINT “A=”，A，"B=”;， B，*“C=”， 避 
50 PRINT “=”，  X，“Y-=”Y，“Z=”3 2Z 
60 DATA 4，5，6，7，8 

70 END 
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RUN 

A=:4 B=5 C=6 

义 王 6 Y=7 《= 一 8 

结果 符合 题目 的 要 求 。 那 么 30 号 语句 中 ，I，J 变 量 究竟 
起 到 什么 作用 呢 ? 10 号 语句 执行 完 后 数据 区 指针 指向 , 7，20 
号 语句 执行 后 ， 指 针 恢 复 指 问 第 一 个 数据 ,根据 题目 要 求 , 现 
在 要 将 指针 指向 第 三 个 数据 6, 指针 需要 向 后 移 两 个 数字 位 。 
为 达 此 目的 ， 增 加 了 两 个 变量 忆 了 作用 只 是 “ 假 读 ?， 实 际 
起 移动 指针 的 作用 。 

《3) 无 条 件 转 疝 语句 GOTO 

计算 机 的 重要 作用 就 是 代替 人 去 做 重复 性 工作 。 例 如 计 
算 不 同 参 数 圆 管 的 体积 ， 需 要 将 程序 运行 多 次 ， 人 工 干 预 的 
话 ，， 操 作 次 数 就 会 十 分 频繁 。 能 不 能 将 程序 设计 成 能 够 自动 
地 回 过 头 去 再 次 执行 呢 ? GOTO 语 名 可 以 办 到 。 

现在 我 们 将 原来 的 程序 加 上 GOTO 语句 ， 看 它 是 如 何 

10 HOME 

20 INPUT A，B，C 

30 LET V=(3:14/4) *(A 人 2 一 BA2)*C 

40 PRINT “V =? 5 六 

50 GOTO 20 

60 END 

RUN _/ 

? 8，6，50 
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从 上 面 情况 我 们 看 出 ， 只 要 键入 -次 RUN， 程 序 就 会 
不 断 地 等 等 你 输入 一 组 参数 ， 并 计算 出 相应 的 体积 。 它 的 执 
行 顺 序 为 10->20->30->40-~>50-~>20->30->40->50 一 >20.……， 如 
此 循环 下 去 ， 虽 然 60 号 语句 END， 表 示 程序 在 这 里 要 结束 ， 
但 是 永远 也 执行 不 到 这 一 行 。 那 么 怎样 才能 阻止 它 一 直 回 转 
下 去 呢 ? 目前 的 办 法 是 只 要 同时 按 下 [CTRLT、 [CT 键 即 
可 。 

GOTO 语 名 的 格式 


行 号 GOTO 行 号 


当 计 算 机 执行 到 GOTO 语句 时 ， 不 再 顺序 执行 下 去 ， 
而 是 跳 到 GOTO 语句 后 面 所 指定 的 行 号 并 继续 顺序 执行 下 
去 。 

(4) 计算 数列 前 N 项 立方 和 

有 数列 ，3，7，16，23，56，69，97，108， 214，325， 

我 们 打算 求 出 前 N_ (CN=1，2，3，…) 项 立方 之 和 ， 
并 且 在 读 入 一 个 数据 后 ， 显 示 出 累加 的 立方 和 。 注 意 : 我 们 
。131。 


先 要 将 准备 放 累 加 值 的 单元 S 和 放 项 数 的 单元 入 潢 谷 。 程 序 
如 下 ; 

10 9S=0 

20 N=0 

30 READ A 

40 S=S 十 A 人 3 

50 N=N 二 1 

60 PRINT “数列 的 前 ”，N “项 立方 和 =”; 5 

70 GOTO 30 

80 DATA 3，7，16，23，56 

90 DATA 69，97，108，214，325 

100 END 

RUN ./ 

数列 的 前 1 项 立方 和 一 27 

数列 的 前 2 项 立方 和 =370 


数列 的 前 10 项 立方 和 = 

此 时 若 键入 ICTRLI 、 [CI ， 则 屏幕 显示 ， 

BREAK IN 30 

党 思 是 程序 在 30 号 语句 被 中 止 。 

我 们 将 N 单 元 作为 计数 单元 ， 每 循环 一 次 增加 1 ， 可 以 
为 我 们 有 效 地 计 录 求 和 的 项 数 。 S 单元 存放 前 N 项 立方 和 ， 
每 循环 一 次 ， 将 此 项 立方 和 与 前 N~-IL 项 立方 和 进行 果 加 。 
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清 大 家 考虑 一 下 ， 若 第 10、20 号 语句 分 别 给 S、N 赋 
一 定 值 ， 后 面 将 会 出 现 什 么 结果 ， 藉 70 号 语 休 改 为 GOTO 
10， 又 将 出 现 什么 结果 呢 ? 


5f1 .初步 的 程序 设计 小 结 及 例题 


通过 前 面 的 学 习 ， 我 们 大 概 对 程序 设计 有 了 一 定 的 了 
解 。 学 习 机 在 我 们 面前 可 能 也 不 会 是 那么 神秘 了 。 在 程序 设 
计 的 道路 上 我 们 前 进 了 一 大 步 ， 需 要 停 下 来 ， 回 顾 一 下 ， 看 
看 能 用 已 学 到 的 知识 干 些 什 么 ， 这 将 会 带 来 更 大 的 提高。 

(1) 程序 的 构成 与 如 何 装 入 执行 

我 们 已 经 接触 过 不 少 的 程序 了 ， 从 中 可 以 知道 程序 是 由 
车 干 条 语句 行 组 成 ， 每 条 语句 是 由 语 名 标号、 语句 定义 符 、 
语句 笨 组 成 。 在 键入 一 条 语句 之 后 要 以 民 ETURN| 键 结 
束 。 

程序 装 入 执行 的 大 体 步 又 如 下 

@ 清 除 内 存 、 清 除 屏幕 ,CNEW HOME); 

四 键入 程序 ， 每 行 要 以 回 车 符 结束 ; 

国 列 程序 清单 (LISTJ 检查 程序 、 修 改 程序 。 

@ 远 行程 序 (RUN)。 

(2) 初步 程序 设计 语句 小 结 

我 们 将 初步 程序 设计 所 涉及 的 语句 进行 小 结 〔 表 4-2)。 

初步 程序 设计 中 涉及 到 的 函数 只 有 一 个 一 一 输出 焰 式 函 
数 下 AHB 庙 数 它 的 格式 为 TAB(Z) 7 其中 过 规定 了 输 岂 项 的 起 
始 位 置 。 
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表 上 2 


芭 庄 名 完 叉 符 


|LE1 


-mm arr amv - 


& 和 | 这 全 六 | 合子 说 明 | 
行 号 LET LET A 二 3 将 党 玫 由 人 
变量 一 表 小 式 LET A 囊 一 “ABC?| 草 入 ， 字 管束 由 给 

ET S=-35AJC | 字符 串 变 由 出 将 
等 号 右边 的 表达 式 
全 站 值 赋 给 


INPUT A,A 串 ,B 


行 号 INPUT 在 程序 执 和 
场 时。， 也 砂 加 有 后 ， 
放量 站 和 是 2 依次 链 入 各 普 呈 
行 号 INPUT |TNPUTA “请 键 入 | 值 ， 以 如 号 分 割 
《提示 信息 ;|Ay?” :人 同和 
砂 
恋 量 ， 变量 作 外 里 的 提示 信 
息 ， 然 后 键入 变量 
行 号 READ “|READ A，B,C,D READ 语 人 
\ 行 中 从 DA: 
变量 1 误 量 站 READTA 出 侣 曲 须 : 序 到 测 数 
提 ， 由 给 相应 的 赤 
行 号 DATA |DATA 1，2，3，4| 旦 ”注意 类 型 要 ~ 
数值 1 数值 2. |DATA; YLTY 惑 兹 沿 人 
最 示 常 数 
行 导 PRINT 表 |pRINT 5 本 这 区 
达 式 PRINT X+Y 让 式 的 信 ， 
PRINT 5A=，” 人 
PRINT A, 了 营 训 两 项 首 字 
离 16 丈 
PRINT 示 一 一 两 项 之 间 没 
有 距 帘 
将 光标 跳 至 下 
.5 标 者 列 小 小 
四 ma 将 DA 下 A 玫 据 
Ri 史 放 入 生肖 和 7 个 
将 程序 转向 2 
折 号 GOTO | 20 与 训 人 内 作 


Le 二 一 一 


〈3) :三 种 赋值 语句 的 比较 

在 初步 的 程序 设计 里 ， 我 们 已 将 三 种 赋值 语句 全 部 修了 
介绍 ， 即 直接 赋值 语句 (LET)、 键 盘 输 入 语句 (INPUT)， 
读数 / 置 数 语 句 -(READADATA)， 那 么 ， 在 我 们 程序 设计 
中 , :要 向 变量 赋 信 ， :究竟 用 娜 一 种 语句 好 呢 ? -下 面 我 们 加 以 
比较 。 

四 直接 赋值 语 名 (LET) :LET 主要 用 于 计算 。 每 条 
语句 只 能 为 一 个 变量 赋值 ， 但 它 赋值 的 速度 比较 快 。 

@@ 键 盘 输 入 语句 ( INPUT ) ， 键 盘 输 入 语句 是 在 程序 
运行 过 程 中 ， 通 过 键盘 为 变量 赋值 ， 它 可 以 在 一 条 语句 里 为 
多 个 变量 赋值 ， 但 由 于 人 工 的 干预 ,速度 比 较 慢 ， 主 要 用 于 
为 经 常 需要 人 工 改变 数值 的 变量 赋值 。 

赎 读 数 / 置 数 语句 (READ/DATA ) : READ/DATA 
语句 主要 用 于 为 大 批量 的 数据 赋值 ， 且 速度 快 。 但 后 两 种 赋 
值 语句 均 没有 计算 功能 。 

〈4) 程序 的 结构 

程序 的 结构 大 体 上 是 按照 程序 执行 的 路 线 来 划分 的 。 在 
初步 的 程序 设计 里 ， 我 们 接触 到 的 程序 ， 除 了 由 无条件 转 移 
语句 GOTO 所 形成 的 无 条 件 循环 结构 外 ， 都 是 按照 语句 标 
号 由 小 到 大 的 顺序 执行 。 这 是 计算 机 固有 的 执行 路 线 ， 我 们 
称 此 类 程序 结构 为 顺序 结构 。 

下 面 ， 我 们 运用 已 学 过 的 知识 在 计算 机 由 实践 实践 。 

[ 例 1 ] 让 计算 机 与 小 朋友 对 话 。 

这 个 程序 可 以 由 年 轻 的 爸爸 妈妈 们 编写 也 可 以 按照 我 
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们 下 面 编 好 的 程序 输入 计算 机 ， 然 后 让 驴子 们 和 计算 机 对 一 
对 话 ， 

程序 的 要 求 是 计算 机 首先 问 。“ 喂 ， 沙 其 发 ， 你 叫 什么 
名 学 呀 ?9 ” 当 小 朋友 回答 了 自己 的 姓名 (如果 不 会 写 出 自己 
的 姓名 ， 写 汉语 拼 痊 也 行 ) ， 计 算 机 接着 问 ; “你 用 册子?” 
小 朋友 可 以 接着 回答 。 当 按照 计算 机 提出 的 问题 一 一 回答 完 
之 后 ， 计 算 机 可 以 将 孩子 的 同 管 显示 在 屏幕 上 上。 程序 如 下 ， 

10 HOME 

20 PRINT“ 小 朋友 ， 你 好 ! 你 叫 什 么 名 字 呀 ? 

30 INPUT Ag 

40 PRINT “你 今年 几 岁 了 ? ” 

50 INPUT B 池 

60 PRINT “你 愿意 和 学 习 机 交 册 友 吗 ! ” 〈: 回 答 愿 
意 或 不 愿意 ) 5 

70 INPUT CH$ 

80 PRINT A 汕 

90 了 PRINT B 惠 

100 PRINT CS “和 学 习 机 交 朋 友 。 闪 

110 世 ND 

RUN 

小 朋友 ， 你 好 ! 你 叫 什么 名 字 呀 ?9 

? 张 玲 ( 操 作者 用 键盘 回答 ) 

你 今年 几 岁 了 ? 

? 八 岁 〈 操 作者 用 键盘 回答 ) 
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你 愿意 和 学 习 机 交 朋 友 吗 ? 
? 愿意 (操作 者 用 键盘 回答 》 
张 玲 

八 岁 

愿意 和 学 习 机 交 朋 友 


[ 例 2 有 数列 


工 


人 
4 5 


1， 部 ， 村， 


依次 显示 前 1 项 之 和 ， 前 2 项 之 和 ，…… 前 # 项 这 和。 
实际 上 显示 的 值 为 ， 


Si=] 


从 项 数 来 看 ， 每 次 递增 1 ， 设 此 变量 为 W,N=N+b 


设 累加 和 的 单元 为 S，S=S 十 方 ， 同 样 设 初 值 S 一 0， 
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这 样 S 的 值 迁 一 次 为 亏 ( 邮 二) 第 二 次 为 工 十 二 …w。 


程序 如 下 ， 

10 HOME 
20 人 =0 

30 =0 

40 =N+l 


一 S 十 工 
50 9 > 十 克 


60 PRINT “前 ”，N， “项 和 =，”;，S 
70 GOTO 40 
80 END 


二 [ 例 3 ] ， 编 一 个 显示 图 4-2 的 


蕉 其 营 程序 。 


其 其 其 名 项 我 们 定 第 一 个 星 为 第 10 列 ， 程 序 


0 
人 2 10 HOME 
20 PRINT TAB(10)8 “ 汪 罗 
30 PRINT TAB(9)8 “党 迪 滥 风 
40 PRINT TAB(8)8 “ 尖 凡 浊 吕 贱 风 
50 PRINT 下 AB(7) 和 9》 交 澡 迪 于 浊 迪 于 于 罗 
60 END 
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二 、 进 一 步 的 程序 设计 


经 过 学 习 初 步 的 程序 设计 ， 我 们 了 解 了 程序 设计 的 基本 
方法 ， 能 用 计算 机 解决 一 些 简单 的 应 用 问题 。 从 程序 的 结构 
来 看 ， 初 步 的 程序 设计 是 按照 程序 执行 的 固有 路 线 ， 即 按照 
语句 标号 由 小 至 头 的 顺序 执行 ， 或 由 GOTQO 语 名 构成 反复 回 
转 的 执行 路 线 。 但 计算 机 之 所 以 称 为 电脑 ， 就 是 人 赋 于 它 逻 
辑 判断 的 功能 ， 我 们 只 有 发 挥 了 它 这 一 功能 ， 才 使 计算 机 有 
了 思维 能 力 一 一 根据 不 同 的 条 件 、 不 同 的 情况 而 采取 不 同 的 
处 理 方法 。 前 面 学 到 的 基本 语句 不 能 解决 此 类 复杂 的 问题 ， 
需要 学 习 进 一 步 的 程序 设计 。 学 习 此 类 程序 设计 的 本 身 ， 将 
会 对 学 习 者 的 逻辑 判断 和 思维 能 力 有 很 大 提高 。 

进一步 程序 设计 包括 分 支 程序 设计 和 循环 程序 设计 ， 是 
整个 BASIC 程 序 设计 的 重要 内 容 。 


52 . 送 你 分 辨 出 是 平年 还 是 冰 年 
一 一 介绍 分 支 程序 设计 


我 们 经 常 遇 到 如 下 问题 ， 夏 天 买 西 瓜 ， 西 瓜 的 价格 与 你 
买 的 多 少 有 关 ， 如 果 你 买 100 斤 以 上 ， 每 斤 为 8 分 ,和 否则 每 斤 
为 T 角 。 

我 们 不 难 写 出 计算 西 上 坏 金额 的 公式 ; 

设 % 为 买 西瓜 的 斤 数 ，2 为 应 何 的 钱 数 ， 

e 139 。 


0 二 


人 (xX100) 
0,10x (〈(xY<<100) 


从 上 面 我 们 可 以 看 出 ，2% 的 值 取决 于 x 的 取 值 范围 ， 孔 
可 以 说 取决 于 一 系列 的 条 件 。 条 件 成 立 ， 即 条 件 为 真 ， 就 按 
照相 应 的 公式 去 计算 西瓜 的 金 括 。 

我 们 再 来 厦 一 个 例子 ;我 们 知道 平年 为 365 天 ， 头 年 
为 366 天 ， 那 么 如 何 来 计算 某 年 是 否 为 头 年 呢 ? 当 某 一 年 的 
年 号 不 能 被 4 整除 时 它 就 是 平年 ! 能够 被 4 整除 但 不 能 被 
100 整 除 时 ， 这 一 年 也 是 闽 年 ， 能 够 被 4 和 100 骆 除 ， 并 同时 
也 能 被 400 整 除 的 年 也 为 闽 年 ， 否 则 都 是 平年 。 

这 里 存在 着 一 系列 的 条 件 ， 设 年 号 为 x， 则 

昌 x 能 否 被 本 整除 ; 

@x 能 否 被 100 整 除 ; 

图 x* 能 否 被 400 整 除 。 

必须 经 过 多 方 判 断 ， 才 能 确定 此 年 为 半年 还 是 平年 。 那 
么 如 何 将 此 判断 方法 教 给 计算 机 ， 让 它 代 替 人 去 自动 地 分 状 
出 平年 和 闽 年 呢 ? 这 也 如 同 我 们 在 前 进 的 道路 上 出 现 了 三 贫 
路 口 ， 看 下 一 步 要 走 哪 条 路 ， 如 果 条 件 成 立 ， 则 走 条 件 为 真 
的 路 。 

“如 果 ” 在 英语 里 用 IF 表示 ，“ 则 ”用 工 HEN 者 示 ， 
可 以 写成 ，IF 条 件 为 真 THEN 走 条 件 为 真 的 路 。 

这 就 是 条 件 语 名 IF……THEN， 它 的 格式 如 下 ， 

格式 1 
se 40 。 


| IF 关系 表达 式 THEN 行 号 


意思 是 ， 如 果 条 件 成 立 ,程序 转向 THEN 后 面 的 行 号 所 
指明 的 语 杀 去 执行 ， 否 则 ， 仍 顺序 往 下 执行 。 
格式 2 ， 


行 号 IF 关系 表达 式 THEN 可 执行 语句 


意思 是 ， 如 果 条 件 成 立 ， 执 行 THEN 后 面 的 可 执行 语 
句 。 和 否则 ， 按 顺序 往 下 执行 。 

条 件 用 关系 表达 式 来 确定 。 如 *<50 就 是 关系 表达 式 ， 
它 是 由 关系 运算 符 连 接 而 成 的 。 关 系 运算 符 有 ，<< (小 于 )3 
> (大 于 )，= (等 于 ) ,>= (大 于 或 等 于 ) ,和 才 王 (小 于 
或 等 于 ) ，<> (不 等 于 ) 等 六 种 。 

平面 就 可 以 着 手 对 前 面 提出 的 两 个 问题 ， 编 制程 序 了 。 

第 一 个 问题 ， 计算 买 西瓜 应 付 钱 数 的 程序 为 ; 

10 HOME 

20 INPUT “请 输入 西瓜 的 斤 数 ” 3; 式 

30 IF x>=100 THEN y=0.08*x，GOTO 50 

40 一 0.1(0 兴工 

50 PRINT “应 付 钱 数 为 ”5 yi “元 ?” 

60 丘 NBD 

RUN .2 
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请 输入 西瓜 的 斤 数 ? 80 4/ 

应 付 钱 数 为 8 元 

这 个 程序 30 号 语句 为 IF 一 THEN 语 句 ， 如 果 条 件 成 立 ， 
按 y= 0.08x 计算 ， 并 且 转 向 50 号 语句 去 执行 。 在 THEN 后 
有 两 条 语句 ， 第 一 条 y=0,.08*x 为 赋值 语句 ， 赋 值 语句 可 
以 省 略语 名 定义 符 LET。 第 二 条 语句 为 GOTO 50， 在 同一 
行 里 出 现 多 于 一 条 的 语句 称 为 多 语句 行 ， 中 间 要 用 “，?” 分 
开 。 

那么 ， 在 30 号 语句 中 ，GOTO 50 起 什么 作用 ， 去 掉 它 
行 吗 ? 不 妨 自己 试 一 试 。 

第 二 个 问题 ， 分 辨 某 年 是 平年 还 是 阔 年 。 

在 处 理 这 个 问题 的 过 程 中 ， 要 用 到 一 个 函数 一 一 取 整 函 
数 INT， 它 的 作用 是 取 不 大 于 此 数 的 最 大 整数 。 

例如 ，INT(3.5)=3 

INT( 一 4.5) 一 一 5 

利用 这 个 函数 我 们 可 以 判断 某 数 是 否 能 被 另 一 个 数 整 
除 。 比 如 1986 能 和 否 被 4 整除 ， 那 就 要 看 1986/4 等 不 等 于 INT 
〈1986/4)， 如 果 相 等 了 ， 就 是 能 被 4 整除 。 

现在 把 判别 平年 和 闽 年 的 条 件 列 举 出 来 ， 设 年 号 为 N， 
则 有 'N/4=INTCNV/4)8 N/100=INTON/1100)8  NV400 
=INTCN/400) 为 条 件 。 

程序 如 下 ， 

10 HOME 

20 INPUT“ 请 输入 年 号 ”，NN 
“142 。 


30 IF N/4<> INT(N/4) THEN PRINT“ 平 年 ”。 
GOTO 70 

40IF N/100<> INT (NV100) THEN PRINT“ 疾 
年 ”，GOTO 70 

50 IF V/400:=INT (N71400) THEN PRINT “ 阔 
年 2 ，GOTO 70 

60 PRIN 个 “平年 ” 

70 END 

RUN 

? (请 输入 年 号 ) 2020 

半年 

RUN 

? 〈 请 输入 年 号 ) 1985 

平年 

因为 这 个 程序 条 件 比较 多 ， 再 来 仔细 分 析 一 下 ，30 号 语 


句 表示 不 能 被 4 整除 ， 条 件 成 立 ， 就 是 平年 了 。 若 条 件 不 
成 立 ， 即 人 能 被 4 整除 接着 向 下 执行 ，40 号 语句 表示 已 经 
能 被 4 整除 了 ， 但 不 能 被 100 整除 ， 就 是 闽 年 ，50 号 语句 ， 
能 被 4 整除 ， 也 能 被 100 整 除 同 时 也 能 被 400 整 除 ， 也 为 间 
年 ;60 号 语句 ， 除 此 之 外 ， 都 为 平年 。 


33 .学 习 机 会 为 我 们 排序 
一 一 介绍 程序 流程 图 


将 许多 数据 按照 一 定 的 规律 排列 出 来 ， 这 是 件 比较 头疼 
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的 事 ， 数 越 乡 ， 排 起 来 速度 就 越 慢 ， 能 不 能 让 学 习 机 来 二 
呢 ? 

先 从 简单 问题 开始 。 将 三 个 数 按照 由 大 到 小 的 顺序 排列 
出 来 。 人 来 处 理 这 个 问题 往往 采取 两 两 比较 ， 若 写 出 程序 ， 
必然 要 多 处 出 现 分 支 ， 条件 语 句 使 程序 结构 发 生 了 变化 ， 不 
再 按 程序 固有 的 路 线 执行 ， 这 样 ， 程 序 设 计 起 来 就 复杂 了 ， 
为 了 使 思路 清晰 ， 我 们 要 借助 于 程序 设计 的 辅助 工具 一 一 流 
程 图 〈 框图 ) 把 程序 执行 的 路 线 表 示 出 来 。 

流程 图 画 法 的 具体 规定 为 : 


Mb ) (d ) 
图 4-3 


(1) 开始 ， 结 束 框 ; 〔【 图 4-3(a) ] 表示 程序 的 开始 或 结 
束 。 

《2) 处 理 框 ， [图 4-3(c)]*。 表示 程序 所 要 进行 处 理 和 运 
算 的 工作 。 

〈3) 判断 框图 4-3(b) ] ， 玫 示 程 序 要 进行 判断 的 内 
闪 。 它 有 一 个 入 口 ， 两 个 出 口 。 一 个 出 口 为 条 件 满 足 ， 用 
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“Y”《〈YES 简 号 ) 表示 ， 另 一 个 出 口 为 条 件 不 满足 ， 用 
“N” 《NO 的 简写 ) 表示 。 

(4) 流程 线 [ 图 4-3(d) ] ， 表 示 程 序 执行 的 路 线 。 

(5) 连接 点 ; 〔 图 4-3(e) ] ， 中 间 标 以 数字 ， 表 示 流 向 
眶 外 的 某 处 ， 或 由 框 外 的 某 处 进入 该 框图 。 

[ 例 ] 计算 房租 。 若 住房 面积 等 于 或 小 于 40 平 方 米 , 按 
每 平方 米 0,10 元 计算 ， 而 住房 面积 大 于 40 平 方 米 的 ， 超 出 部 
分 ， 按 每 平方 米 0,50 元 计算 。 

设 住房 面积 为 W， 房 租 为 S ， 计 算 公式 为 


Le 从 委 40 
0.10X40 十 0.5X(CN 一 40) N>>40。 


框图 如 图 4-4。 其 中 第 一 个 判断 框 N= 一 1 是 设立 的 一 
个 结束 标志 ， 如 果 不 再 想 计算 了 ， 这 时 ， 便 从 键盘 上 将 一 1 
赋 给 XY， 这 时 此 条 件 成 立 ， 程 序 转向 结束 。 

程序 如 下 ， 

10 INPUT “请 输入 住房 面积 ”，N 

20 IF N= 一 1 THEN 70 

30 IF N>40 THEN 9=0.1*40 十 0.5#(N 一 40) ， 

GOTO 50 

40 一 0.10*N 

50 PRINT “应 付 房 租 ”，S; “了 邢 ?” 

0 GOTO 10 

70 END 
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S 一 0.1X40 十 0.5XCN-40) 


RUN ./ 

请 输入 住房 面积 ? 30 

应 体 房 租 3 元 

请 输入 住房 面积 ? 50 

应 付 房 租 9 元 

请 输入 住房 面积 ? 一 1 

这 时 ， 程 序 就 执行 完毕 。 
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对 于 广 闻 该 习 揽 末 陪 程 序 ， 一 定 有 先 画 出 框 国 ， 然 居 酝 


人 


分 支 之 间 前 英 系 。 注 评 找 癌 
然后 一 个 分 支 ， 一 个 分 文 计 
语句 话 号 一 定 要 对 应 。 

下 面 我 们 将 以 计算 机 基 序 为 俩 求实 蜂 这 一 过 程 。 

我 们 知道 ， 三 个 汐 的 排列 ， 可 以 有 六 和 不 同 的 顺序 ， 我 
们 采取 两 两 互相 比较 的 方法 进行 。 框 国 罚 图 4-5。 

和 车 一 看 , 这 个 框图 好 复 藉 呀 ! 要 编写 程序 ,如 何 下 平 呢 ? 

其 实 ， 当 你 画 出 了 和 框图， 说 序 基 本 开 总 出 来 了 。 让 我 们 
一 起 来 完成 它 肥 ! 

这 个 框图 ， 我 们 将 其 分 为 六 个 支 路 (图 4-5 ) 。- 在 这 些 
支 路 中 ， 我 们 首先 找 册 主干 四 ， 先 将 四 的 程序 号 出 ， 

10 INPUT “A=”}， 和 A 

20 INPUT “B=”;， 了 B 

30 INPUT “C=，”，C 

40 IF A>=B THEN 

50 IF B>=C THEN 

60 PRINT C，B，A 

700 END 

只 剩 下 40、50 号 语句 中 ， 转 出 何 处 的 入 加 语句 标号 没有 
定 下 ， 我 们 暂且 空 着 。 


溯 二 芭 的 涩 行政 线 ( 如 主干)， 
济 注 意 转移 的 
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aa 


Sara 


继续 编写 @ 支 路 的 程序 

80 IF A>=C THEN 

90 PRINT C，A，B 

100 GOTO 700 

由 于 @ 支 路 入 口 地 址 明确 了 ， 所 以 40 号 语句 的 入 口 地 址 
也 就 可 以 确定 了 。 我 们 就 可 以 将 40 号 语句 THEN 后 填 入 80 
了 。 注 意 ， 为 什么 100 号 语句 要 GOTO 到 700 呢 ，700 号 语 条 
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藤 为 END， 它 是 各 支 路 的 汇合 点 。 

照 此 很 容易 就 可 以 把 各 支 路 程序 写 | 
出 ， 然 后 将 空 着 的 语句 标号 填 上 ， 这 个 
曜 序 基本 上 就 算 完工 了 。 

但 是 ， 这 个 程序 的 解 题 思路 并 不 是 
限 佳 的 。 我 们 还 可 以 用 交换 变量 的 方法 
来 实现 。 这 是 一 种 常用 的 办 法 ， 具体 
是 ， 首 先 确定 在 人 这 个 单元 放 最 大 的 
数 ， 方 法 是 ，A 先 与 B 比较 ， 如 果 A 大 
则 不 交换 ，A 小 则 A、B 交换 。 然 后 ， 
A 与 C 比较 ，A 大 则 不 交换 ，A 小 则 A、 
C 交 换 ， 确 定 A 为 最 大 。 然 后 B 与 C 比 
较 ，B 大 则 不 交换 ，B 小 则 B、C 交换 ; 
确定 B 为 第 一 ， 那 么 C 必然 为 最 小 。 因 
此 从 大 到 小 的 顺序 为 A、B、C。 画 出 
框图 (图 4-6 ) 。 

程序 如 下 ， 

10 INPUT “A，B，C=”; 

A，B，C 

20 IF A>=B THEN 60 

30 S= 人 A 

40 A=B 

50 也 一 9 

SO0 IF A>=CTHEN 100 
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70 S = 一 人 

80 A 一 CC 

90 C=9 

100 IF 如 人 =C THEN 140 

110 9S=B 

120 B=C 

130 C=9 

140 PRINT A，B，C 

150 卫 ND 

RUN 

A，B，C=? 6，9，3 

9 6 3 

需要 解释 一 点 的 是 * :程序 中 变量 ?5 是 一 个 中 间 变 量 ， 使 
得 两 个 变量 可 以 互相 交换 。 


54. 我 们 的 电子 教师 
一 一 介绍 RND 函数 


我 们 前 面 提 到 中 华 学 习 机 可 以 为 我 们 辅导 功课 。 下 面 ， 
它 就 要 充当 电子 教师 给 大 家 出 一 些 题目 ,检查 、 考 试 一 番 , 看 
看 知识 掌握 得 怎么 样 了 。 考 试 的 关键 是 出 题目 ， 题 目 要 出 得 
灵活 ， 不 能 千篇一律 。 怎 样 才能 做 到 这 一 点 呢 ? 不 要 着 急 ， 
BASIC 里 有 一 个 有 趣 的 函数 一 -RND(x) ， 它 被 称 为 随机 
数 发 生 器 ， 可 以 为 你 解除 此 烦恼 。 

由 于 RND 函数 可 以 随时 给 出 变化 莫 测 的 数字 而 取 名 随 
。150 。 


横 表 数 。RND(x) 中 的 x 值 只 是 形式 上 的 变量 ， 它 的 取信 范 
围困 不 疗 机 型 而 有 所 不 同 。 在 中 华 学 习 机 上 上 ， 当 < 取 正 数 时 
RND(x) 才 真正 产生 随机 数 。 

看 下 面 的 例子 ， 当 赋 于 x 不 同 的 10 个 值 时 ， 分 别 显 示 出 
它们 的 函数 值 ; 

5 工 一 0 

10 INPUT XX 

20 PRINT RNDI4X) 

30 I=I+1 

40 IF I<10 THEN GOTO 10 

50 END 

我 们 从 键盘 上 分 别 键入 正 数 、 零 、 负 煞 ， 看 有 什么 结果 
出 现 。 其 结果 是 ， 当 输入 负数 总 是 出 现 0~1 之 间 某 一 固定 的 
数 。 当 输入 零 时 ， 和 上 次 结果 相同 。 上 只 有 当 输 入 正 数 时 ， 才 
会 不 断 出 现 一 个 与 输入 数 无 关 的 、 及 有 明显 变化 规律 的 、 在 
0 一 1 之 间 均 匀 分 布 的 数 。 那 么 怎样 才能 产生 其 它 范围 的 随机 
数 呢 ? 这 可 以 通过 一 定 的 运算 来 实现 。 

例如 ， 产 生 0 一 99 之 间 的 随机 台数 ,可 以 从 下 面 的 式 子 得 
到 。 

A=INT(100*RND(1L1)) 

若 要 产生 0 一 99 之 间 的 带 有 两 位 小 数 的 随机 数 ， 则 

A=INT(10000*RND(1))71100 

总 之 掌握 了 以 上 这 些 ， 我 们 训 可 以 编写 程序 ， 让 学 
机 充当 电子 教师 了 。 
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我 们 准备 来 加 强 一 下 孩子 们 的 口算 能 力 ， 让 他 们 任意 挑 
选 “+”、“--”、“x”、“+ ”四 种 运算 中 的 一 种 ， 然 
后 由 电脑 出 100 之 内 的 此 种 运算 口算 题 10 道 ， 让 孩子 迅速 给 
出 答案 ， 若 全 算 对 了 ， 学 习 机 给 出 “很 好 ”， 算 对 八道 以 
上 ， 学 习 机 给 出 “好 ”; 算 对 六 道 以 上 ， 学 习 机 给 出 通过 
算 对 六 道 以 下 ,学 习 机 会 问 你 “ 愿 不 愿意 再 继续 练习 ” , 若 加 
答 “ 愿 意 ” 学 习 机 会 重新 再 给 你 出 10 道 题 。 框 图 如 图 4-7。 

程序 如 下 ， 

10 N=0，S=0 

20 INPUT “准备 好 了 了 吗 ? 你 要 进行 十、 一 、* 、/ 哪 

一 种 运算 的 练习 ， 请 回答 运算 符 ”， T$ 

30 IF N>>=10 THEN 150 

40 A=INTCRND(1) *100) 

50 B=INTCRND(C1) * 100) 

60 IF 个 和 =“+”THEN D=A+B，GOTO 100 

70 IF T 和 $$ =“ 一 ”THEN D=A 一 B，GOTO 166 

80 IF 了 和 书 =“*”THEN D=A>B，GOTO 100 

90 IF 册 T=“”THEN IF B=0 THERN GOTO 

50 

95 D :INT(CA/B 二 0.5) 

100 PPINT A TV$ By “=”4， 

110 INPUT C 

120 IF CC=D THEN S=S 十 1 PRINT“ 对 了 ! 

:GOTO 30 
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125 
130 
140 
150 
160 
170 
18 
190 
200 
210 


己 


将 90 号 语句 说 明 一 下 ， 


PRINT“ 错 了 1! ? 

N=N 二 1I 

@OTe@ 30 

1F S=10 THEN PRINT “很 好 >?， 钳 OTO 216 
IF S>=8 THEN PRINT “好 ”，GOTO 210 
IF S>=6 THEN PRINT “通过 *，GOTO 210 
PRINT “很 遗憾 ,你 还 愿意 继续 练习 吗 ? 〈 是 / 否 ) 
INPUT A$ 

IF A 书 = “是 ”THEN GOTO 10 

END | 


90 号 和 9%5 号 语句 对 两 个 问题 作 了 处 输入 X 值 


理 。 一 个 是 分 母 为 零 时 ,重新 产生 分 母 B; 
第 二 是 将 答案 四 会 五 入 ， 因 此 ， 在 上 机 
时 ， 作 除法 不 能 整除 时 ， 要 求 四 合 五 入 。 

当 我 们 将 程序 输入 学 习 机 ， 它 就 会 不 
厌 其 烦 地 为 我 们 出 题 、 考 试 、 改 卷 ， 仇 然 
像 一 位 非常 负责 任 的 “教师 ”了 。 


55 .分支 程 序 设计 例题 

[ 例 1] 计算 Y=X! 本 
框图 如 图 4-8。 RN 
程序 如 下 ， 有 明 人 


10 INPUT “请 输入 x 的 值 > ，x 元 ， 
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20 Y=! 

30 N 一 又 

40 Y 一 YxN 

50 N=N 一 1 

60 IF N>1 THEN 40 

70 PRINT4Y =” Xi ， 41=”3 Y 

80 END 

RUN 。/ 

请 输入 x 值 ? 3 .2/ 

YY 一 3!=6 

[ 例 2] 输入 若干 
个 数 ， 分 别 统计 正 、 负 | 
数 的 个 数 及 合计 值 。 

在 问 学 习 机 输入 数 | 
时 ， 我 们 设立 一 个 终止 
标志 ， 为 一 1, 当 学 习 机 
接收 一 1 后 ,读数 结束 。 | 

我 们 先 将 框图 画 出 
来 (图 4-9 ) 。 

程序 如 下 ， 

10 N1=0:S1=0， 

N2=0:S2=0，| 
20 INPUT A 
30. IF A= 一 1 
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THEN 110 
40 IFR A<0O THBEN 80 


arrararrsaearr eararasovponsacraumrercerrnmveyvaioirecyrrrneagcropoipDEWTC 0 


850 N1=NI1 十 1 
60 S1 一 S1 十 人 A 
70 GOTO 20 
80 N2 王 N2 十 1 
90 S2 王 S2 十 人 
100 GOTO .20 
110 PRINT “站 
有 ”5 N13 
“个 正 数 ”， 
“它们 的 和 
是 ”3 91 
120 PRINT “不 
有 ”5 N2， 
“个 负数 ”， 


“它们 的 和 


广 -一 -二 一 : | 
了 答 出 选票 情况] 
是 ”; 592 A、B、C | | 


130 END | 
[ 例 3] 统计 选 CC 于) | 


票 。 现 有 王 平 、 李 明 、 志 1 


Carrierer 一 are Lianpeeraerrrerarms viemICVaICONIN te 


张强 三 候选 人 ， 选 其 中 图 4 
一 名 为 优秀 队员 ， 将 选票 情况 显 东 出 来 。 
框图 如 下 ， 


程序 如 下 : 

10-A=0， 3B=0 C=0 

20 INPUT“ 请 输入 得 票 人 姓名 ( 王 平 ，1 ， 李 骨 ， 
2 ， 张 强 ， 3 ， 完 毕 ， 0 )”;N 

30 IF N=0 THEN 70 

40 IF N=1 THEN A=A+1，GOTO 20 

50 IF N=2 THEN B=B+1，GOTO 20 

60 IF N=3 THEN C=G+1，GOTO 20 

70 PRINT “ 玉 平 得 票数 为 ”， 人 A 

80 PRINT “ 李 明 得 票数 为 ” ，B 

90 PRINT“ 张 强 得 票数 为 ”， C 

100 END 


56 ,用 学 习 机 来 验证 实验 数据 
一 一 介绍 单 重 循环 FOR 一 NEXT 语 各 


循环 程序 的 设计 我 们 在 前 面 已 经 有 所 接触 ， 鲍 如， 求 。 
1 一 10 的 累加 值 。 

在 初步 的 程序 设计 里 ， 可 以 写 出 如 下 程序 ， 

10 9 王 0， 工 =1 

20 S=S-+I 

30 PRINT S 

40 TI=:I++1 

50 GOTO 20 

60 END 
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这 个 程序 由 GOTO 语句 形 成 往返 重复 ， 只 有 键入 
JS 一 贷 ， 才 能 够 停止 执 街 ， 而 用 循 环 的 次 儿 研 此 环 

能 确定 ， 因 此 ， 题 目的 要 求 也 没有 完全 达到 。 

在 分 支 程序 设计 里 ; ' 又 可 以 写 册 如 下 程序 ， 

10 S$=0， 工 =1 

20 S 王 9 十 

30- 工 =I 上 +1 

40 IF I>10 THEN PRINT S3$，GOTO 60 

50 GOTO 20 

60 下 ND 

看 这 个 程序 ， 是 由 IF 和 GOT@ 组 成 了 循环 。 芽 既 作为 
计数 单元 ， 又 作为 变量 出 现 。 先 给 I 赋 初 值 为 1 ， 执 行 一 遍 
累加 计算 ， 然 后 修正 计数 单元 ， 然 后 判定 计数 单元 是 否 超出 
界限 一 一 车 没有 超出 界限 ， 再 次 累加 ， 革 超出 了 界限 ， 循 环 
结束 。 

我 们 知道 ， 计 算 机 最 突出 的 优点 是 能 代替 人 作 大 量 重复 
性 的 工作 ， 几 乎 所 有 的 程序 都 要 涉及 循环 过 程 ， 因 此 ， 
BASIC 语 言 提 供 了 专门 的 循环 语句 FOR 一 NEXT 来 完成 控 
制 循环 次 数 的 工作 。 

下 面 我 们 就 用 FOR 一 NEXT 语句 来 将 上 例 程 序 写 出 ， 

10 S=0 

20 FOR ITI=1l1 TO 1!10 STBBP 1 

36 9 一 9 十 I 

40 NEXT I 
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50 PRINT SS 

60 END 

这 个 程序 看 起 来 简单 明了 ， 而 且 执行 速度 快 。 其 中 的 20 
号 语句 FOR 开始 为 循环 控制 变量 I 赋 初 值 为 1 ，TO 后 面 将 
循环 控制 变量 的 终 值 定 为 0，STEP 为 步 长 ( 即 循环 控制 变 
量 的 增值 ， 这 里 为 1 ) 。 接 下 去 ，30 号 语句 计算 累加 值 ， 这 
是 循环 的 主题 部 分 ， 每 循环 一 次 ， 就 要 执行 一 次 ， 因 而 称 之 
为 循环 体 ， 它 处 于 FOR 与 NEXT 之 间 。 在 这 个 程序 里 ， 循 
环 体 只 有 一 条 语句 ( 当然 也 可 以 是 多 条 ) 。 接 下 去 NEXT I 
为 循环 结束 语句 ， 表 明 此 次 循环 结束 ， 取 循环 控制 变量 的 下 
一 个 值 ， 再 与 EOR 语句 指出 的 循环 变量 终 值 进 行 比 较 。 若 
没有 超过 终 值 ， 返 回执 行 循环 体 ， 超 出 终 值 ， 退 出 循环 ， 执 
行 NEXT 后 面 的 语句 。 既 然 FOR 语 句 和 NEXT 语句 共 同 来 
完成 控制 循环 次 数 的 任务 ， 因 此 ， 它 们 必须 成 对 出 现 ， 否则 
计算 机 将 给 出 出 错 信息 (参看 附录 C ) 。 

FOR 一 NEXT 语 名 的 格式 如 下 ， 


FOR 循环 变量 =el TO e2 STEP 央 
循环 体 
N 了 XT 循 织 变量 


其 中 ，ei: 初 什 ; ej， 终 值 ， es: 步 长 。 

执行 过 程 为 ， 先 给 循环 变量 赋 初 值 s、 终 值 e、 步 长 es; 
执行 循环 体 后 ， 循 环 变量 加 上 步 长 与 终 值 比较 ， 若 大 于 终 值 
e。 159。 


刚 循 环 结束 ， 若 小 于 终 值 ， 继 续 执 行 循 环 体 。 

循环 语句 在 使 用 中 要 注意 以 下 几 点 ， 

@@ 御 环 变量 前 初 值 、 终 值 、 步 长 可 以 是 常数 、 变 量 和 表 
达 式 。 当 步 长 为 工时 ， 可 以 省 覆 不 写 。 

[ 例 ] ， 输出 从 0 开始 到 180 "每 玉 10 的 正 张 值 。 

程序 如 下 ， 

10 FEOR I=0.TO .3.14 STEP 3.14/18 

20 PRINT SIN4)， 

30 NEXT 1 

40 END 

其 中 ， SITN(T) 为 正 弱 函 数 ， 角 度 在 运算 中 采用 红 度 制 。 

以 上 举 的 例子 步 长 都 为 正 数 ， 下 面 举 一 个 步 长 为 负数 的 
例子 4 

[ 例 ] “要 将 1 到 50 之 间 的 奇数 ， 由 大 到 小 按 顺序 输 
出 ， 其 程序 如 下 ; 

10 FOR I=50 TO 1 STEP -2 

20. PRINT I-! 

30 NEXT I 

40 END 

第 1 次 执行 循 球体 ， 输 出 49， 第 二 次 输出 47， 第 25 次 特 
环 时 I=2， 执 行 循环 体 后 ，30 号 语句 NEXT I， 加 上 步 长 
一 2 ， 当 I=0 时 ， 超 出 终 值 ， 退 出 循环 。 

约 循 环 变 量 初 值 、 终 值 和 步 长 选择 要 含 适 ， 否 则 会 影响 
循环 的 执行 。 如 
,160。 


10 READ N 

20 FOR TI=3 TO -3 3STEB N 
30 PRINT 1 “ ”3 

40 NEXT I 

50 GOTO 10 

60 DATA 一 2，0，2 

70 END 

RUN 29 


333333……， 

取 第 一 个 数据 一 2 时 ， 步 长 为 一 2， 程 序 正常 狼 行 4 次 。 
到 第 二 个 数 0 时 ， 循 环 无 休止 ， 因 此 不 可 取 。 当 取 第 三 个 数 
十 2 时 ， 步 长 为 2 ，I=3 时 执行 了 一 次 循环 体 的 运行 ， 而 当 
I 再 增加 步 长 2 使 [= 5 时 ， 离 终止 一 3 越 来 越 远 ， 循 环 无 法 
执行 。 

图 在 执行 循环 语句 的 过 程 中 ， 只 多 许 由 循环 体内 转向 和 
环 体外 ， 而 不 多 许 由 循环 体外 转向 循环 体内 。 

现在 ， 让 我 们 共同 来 完成 一 个 题目 ， 用 计算 机 来 验证 实 
验 结果 。 

题目 内 容 是 这 样 的 ， 以 初速 度 为 120 米 / 秒 紧 直 上 抛 一 
物体 ， 列 出 从 最 大 高 度 开始 ， 每 下 降 1/10 高 度 所 用 的 时 
间 。 

人 A .分 析 ， 竖 直上 抛物 体高 度 为 4= ut 一 of 下落 高 


161， 


谭 为 1 一 90， 1Y 玉 1/@ 


B .程序 ， 

10 V0=120 

20 个 =9.8 

30 工 王 V0/G 

40 H=V0# 下 一 1/2* 图 个 * 个 

45 PRINT “V0=”3;V686， 人 =”; 二 
50 FOR I=0 TO H STRBP H/10 
60 工 =SQR(2*I/G) 

70 PRINT“H:=>? TI，“T 一 ”3 工 
80 NEXT [ 

90 END 


57. 判 素数 
一 一 介绍 多 重 循环 


当 我 们 学 习 过 循环 语 旬 之 后 ， 了 解 到 循环 语 包 用 于 重复 
地 做 相同 或 类 同 的 事情 。 而 如 果 我 们 在 循环 内 部 还 要 做 重复 
的 相同 或 类 同 的 事情 时 怎么 办 呢 ? 这 就 要 用 到 双重 循环 ， 甚 
至 是 多 重 循环 。 

[ 例 ] 。 编 每 一 个 程序 ， 能 够 打印 出 《 思 九 表 》( 图 全 
11 )。 

从 图 4-11 中 可 以 看 出 ， 九 泌 表 具有 10 行 10 列 。 每 一 个 特 
全 2 行 ， 因 此 ， 要 设计 成 在 循环 里面 供 套 循环 。 程 序 
，162 


为 ， 


345678 9 
34567 8 9 
6 8 10 12 14 16 18 
'9 1215 18 21 24 27 
12 16 20 24 28 32 36 


。' 心 co ie 于 
心 co NS 二 亚 
oo 口中 Sb 


上 昌 昌 站 站 站 全 
四 昌 。 四 是 生 作 


4-11 


10 了 R# 

20 FOR I=1 TO 9 

30 PRINT TAB(I*5)3 TB 

40 NEXT 

50 PRINT 

60 FOR I=1 TO 9 

70 PRINT HB 

80 FOR J=1 TO 9 

90 PRINT TAB(5YJ)5 工 # 了 3 

100 NEXT 了 J 

105 PRINT 

110 NEXT 

120 了 R#0 

130 END 

著 运 行 此 程序 ， 便 在 纸 上 打 印 出 九 九 表 。 

这 个 程序 10 号 语句 坟 诉 学 习 机 以 后 所 有 显示 语句 都 打印 
“63。 


在 纸 上 。120 号 语句 通知 学 习 机 返回 屏幕 显示 。20 一 40 号 请 
名 构成 循环 ,打印 出 第 一 行 的 乘 数 ， 其 间隔 为 4 列 ，60 一 110 
号 语句 构成 双重 循环 ， 它 的 功能 是 打印 出 被 乘 数 和 积 。 每 执 
行 一 次 外 循环 ， 就 要 将 内 循环 执行 一 遍 。 即 打印 出 一 行 ， 当 
外 循环 执行 完 ， 九 行 便 全 部 打印 出 。 

BASIC 语 言 对 多 重 循环 作 了 以 下 规定 ， 

直 多 重 循环 的 层 数 最 多 不 得 超过 八 层 。 

四 内 外 层 循环 不 能 交叉 ， 如 

-一 10 FOR TI=1 TO M 
一 20 EOR J=1 TO IN 


是 错误 的。 
一 50 NEXT 1 


-一 60 NEXT 可 
下 面 我 们 共同 来 完成 多 重 循环 的 例题 。 


[ 例 1] 统计 一 个 班级 每 个 学 生 五 门 功课 的 平均 成 绩 
〈 以 六 个 学 生 为 例 ) 。 如 表 4-3。 


| 全 学 
72 | 9 | 80 | 87 
99 | 8 | 89 | 94 
65 76 8 0 
78 | 85 | 89 90 
94 | 8 | 92 | 393 
- 山 -.67_ | 8 [了 


sa 人 4 。 


我 们 将 计算 每 个 学 生 五 门 功课 成 绩 


理 。 -程序 加 下 ， 


10 
20 
30 
40 
50 
60 
70 
80 
90 


100 
110 
120 
130 
140 
150 
160 


PRINT “学 号 ? ， 


FOR I=1 TO 6 


3S=0 


FOR J=1 TO9 5 


READ A 
S=S+TA 
NEXT- 了 


PRINT I，INT(S/15 * 


下 XT 工 
DATA 86， 
DATA 92， 
DATA 72， 
DATA 80， 
DATA 90， 
DATA 65， 
END 


“平均 成 绩 ” 


10 十 0.5)/110 


80， 
89， 
82， 
39， 
92， 
45， 


87 
94 
70 
91 
93 
32 


在 内 循环 蜂 


运行 处 


其 中 第 80 号 语言 在 计算 平均 数 时 ， 四 命 五 入 保留 一 位 小 


[ 例 2] 判 素数 。 


我 们 准备 将 1 一 100 之 间 自 然 数 中 的 全 部 素数 挑 出 来 。 所 
谓 素 数 ， 就 是 除了 1 和 此 数 本 身 之 外 ， 不 能 被 其 它 整数 整除 
的 自然 数 。 


我 们 知道 除 2 以 外 ， 偶 数 不 会 是 素数 ， 那 么 只 要 查看 者 

数 就 行 了 ， 若 此 奇数 六 能 够 被 To 
3、4…… 直 到 INTv 万 整除 ， 
就 应 被 排除 在 素数 之 外 了 。 那 么 | 
为 什么 只 检 查 到 INTv 丈 呢 ? 
那 是 因为 假设 六 为 合 数 ， 则 有 
N=o， 我 们 假定 c<%， 则 有 
ca<vN。 

先 将 框图 画 出 来 (图 4-12) 。 

程序 如 下 ， 
10 PRINT ?2， 
20 FOR N=3 TO 99 
STEP 2 

30 FOR I=3 TO INT 
(SQRCN)) 

40 IE N/I=INTCN/D) 
THEN 70 

50 NEXT [ 

60 PRINT N， 《 结案 

70 NEXT N ee 

80 END 


58 .进一步 的 程序 设计 小 结 及 例题 
进一步 的 程序 设计 是 我 们 学 习 程序 设计 中 最 关键 的 一 
"166。 


环 ， 它 交 给 了 我 们 程序 设计 有 力 的 工具 。 
柄 于 测量 用 杭 必 帮助 秘 付 得 清册 路 ， 明 息 过 程 的 流 
轴 ， 从 而 为 设计 复杂 的 程序 商定 基础 。 
进一步 音程 序 设 计 中 ， 出 现 了 分 支 程序 结构 和 循环 程序 
结构 ， 它 们 都 是 最 主要 的 程序 结构 ， 使 计算 机 有 了 判 断 能 
力 ; 同时 ， 我 们 涉及 到 一 些 语句 和 一 些 函 数 ， 如 表 4-4 、 表 
4-5。 


启 4 


Te aaaraaaner 一 一 


史 | 员 窜 |。 ma 说 | 
IF IF 关系 表达 式 | IF A>5 THEN| 。 当 关系 才 达 起 成 | 
THEN THEN 行 号 30 立 转 向 THEN 后 语 
IF 关系 麦 达 式 | IF A 串 = “Y” | 名 标号 指向 的 语句 
THEN 可 执行 THEN 当 关系 表达 式 成 
庄 句 PRINT A | 立 ， 执 行 THEN 后 
可 执行 语句 
下 | FOR 循环 变量 | FOR I=1TO10| et 为 循环 变量 初 值 
:= STEP 2 十 5 为 循环 变量 终 值 ， 
TO ez STEPea| PRINT TI 3 为 步 长 | 
循环 体 NBXT 


NBXT 循环 变量 


167。 


画 雪 | 会 久 | 色 | 贡 讲 
INTCO | 阴间 效 ， 基 | INT(5.9=5 | 1 光电 人 能 香 被 B 放 队 
不 大 于 zx 的 最 | INT(--5.8) = 一 6 INTCA7B)=A/B 
大 整数 ?3. 用 于 四 会 五 入 运算 
INT(CA sw10 十 0.5)7/10 
小 数 点 后 第 二 位 进行 四 合 
五 入 


RND(GX) 的 可 示 数 产生 RND(1) 产生 一 个 (0,| 产 生 一 个 8 一 99 的 随机 整数 
一 个 随机 数 | 1) 之 间 的 随机 数 人 -INTCRND(1)，100) 


SQR(X) 


开平 方 SQR(9) 一 2 自 变 量 zx 的 值 必须 大 于 或 
等 于 0。 


[ 例 .1] 《分 牛 的 传说 ) 相传 古 印 度 有 一 位 老人 ， 他 临 
死 前 把 三 个 儿子 叫 到 床 前 说 ， “我 的 遗产 只 有 十 九 头 牛 ， 你 
们 分 了 了 吧 ! 滋 大 分 总 数 的 1/2， 老 二 分 总 数 的 1/4， 老 三 分 总 
数 的 1/5" 但 切记 不 准将 牛 宁 了 ?”。 说 完 便 死 了 。 

三 个 力 子 左思 右 想 ， 没 有 什么 办 法 。 有 一 天 ， 一 位 老人 
过 着 一 头 牛 从 他 们 家 门 前 路 过 ， 看 见 三 兄弟 唉 声 叹气 ， 问 明 
原因 ， 稍 癌 恩 索 说 ， 这样 吧 ， 将 我 这 头 牛 借 给 你 们 ， 凑 成 
二 十 头 ， 堵 六 分 1/2 应 得 十 头 ， 老 二 分 1/4 应 得 五 头 ， 老 三 分 
1/5 应 得 4 闫 ， 余 下 一 头 还 归 我 。?” 三 兄弟 听 黑 非常 高 兴 ， 
问题 得 到 圆满 解 况 。 

。163 。 


现在 我 们 想 想 ， 似 乎 有 些 问 题 ， 老 大 应 分 19X1/2 一 9.5 

头 ， 怎 因 分 了 十 头 ? 老 焉 老 三 世 椒 应 该 分 嘟 么 多 。 现 剖 ， 让 
计算 机 来 给 他 们 三 兄弟 重新 分 一 下 ， 看 绪 果 如 何 。 

国 二 工 十 工 十 工 ) 二 19X 

共有 19 头 牛 ， 第 一 次 分 18 x (去 十 了 二 ) 博 加 50 

<<19〈 没有 将 牛 分 完 ) ， 璋 下 19 


19 _ 人 19) = 查 | 

一 X = 一 一 =- 二) 一 一 ( 头 )。 
19 5 19(1 | 50( 头 ) | 
RS 到 %( 二 直 。 | 
黎 二 次 分 E 亲 (二 十 二 十 二 | 


20 20 


= 也 x 巩 ( 仍 没 分 完 )， 琵 下 


19_19 人 作 = 下 ) 


20 20 20 20 20 


、 19 
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这 样 一 次 次 地 分 下 去 ， 永 无 
止境 ， 我 们 假设 分 20 次 ， 设 三 个 
儿子 分 得 数量 为 A.B、C， 为 了 
得 到 整 牛 要 进行 四 舍 五 入 处 理 。 
先 将 框图 雷 出 来 (图 4-13 ) 并 设 
计 程 序 ， 
10 FOR 1=1 TO 20 


“ it69。 


20 S=19 一 A 一 了 一 人 
36 人 一 9/2 十 人 A 

40 也 =S9/4 十 也 

50 @ 王 8$/15-HC 

60 NEXT I 


70 PRINT INT(CA* Tt000 十 0.005)/ 人 41000)。， INT((B 
#1000 十 0.005)/1000)， INT(CC#1000 十 0.005)/ 


1000) 
80 ND 
RUN <-/ 
10 5 4 
计算 机 分 的 结果 与 老人 分 的 结果 
完全 相同 。 


[ 例 2] 《〈 求 最 大 公约 数 ) 用 手 
算 求 最 大 公约 数 时 ， 一 般 采 用 得 除 
法 ， 比 较 麻 烦 。 现 在 准备 让 学 习 机 采 
取 这 样 的 方法 来 求 出 最 大 公约 数 。 先 
需 框 图 (图 4-14 ) ， 再 设计 程序 : 

10 PRINT “X”，“VY”，“ 最 

大 公约 数 ” 

20 INPUT X，Y 

30 PRINT X，Y， 

40 IF X>=Y THEN 60 

50C=X，X=Y:，Y=C 


e170。 


图 4-14 


60 FOR I=Y TO 2 9TEP 一 1 
70 IF (X/I=INT(X/TD) AND ((Y/I=INTCY/D > 


THEN 90 

80 NEXT I 

90 PRINT 工 

100 END 

[ 例 3] 打印 出 图 4-15。 

要 打印 出 工行 本 列 的 图 形 ， 移 
必然 要 用 到 双重 循环 ( 外 循环 控 
制 行 ， 内 循环 控制 列 ) 。 外 循环 六 闪闪 贡 

牙关 让 其 兴 党 从 其 锥 


变量 好 确定 ， 关 键 是 内 循环 变 基准 各 委 让 尖 六 入 的 各 多 
量 ， 确 定 每 行列 数 ， 第 一 行为 1 党 欠 煞 花 从 闪闪 放 吕 只 只 吕 让 
列 ， 第 二 行 为 3 列 ， 0 第 ] 行 蝇 品 这 贡 名 乱 号 襄 襄 器 次 关 名 品名 
为 2XI 一 世 列 。 然 后 是 花 的 位 置 图 4-15 
要 由 TAB 函数 来 确定 。 将 第 一 个 花 打 印 在 20 列 位 置 ， 第 二 
行 、 第 一 个 花 为 19 列 ， 因 此 为 20 一 I 列 。 

程序 如 下 ， 

10 FOR I=1 TO 8 

20 PRINT TAB(20 一 D 

30 FOR J=1 TO 2* 工 一 ] 

40 PRINT “* ”3 

50 N 瑟 XT J 

60 PRINT 

70 NEXT I 
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80 上 END 


三 、 高 一 级 的 程序 设计 


经 过 初级 程序 设计 和 进一步 的 程序 设计 之 后 ， 我 们 已 经 
掌握 了 程序 设计 的 基本 方法 。 那 么 怎样 才能 使 我 们 编制 出 的 
程序 更 有 效 、 更 简洁 、 更 合理 昵 ? 那 就 是 高 一 级 程序 设计 所 
隙 解决 的 问题 了 。 


59 .评选 最 佳 运 动员 
一 介绍 单 下 标 变 量 和 一 维 数组 

我 们 以 前 学 到 前 变量 都 是 简单 变量 ， 它 们 之 间 没 有 什么 
内 在 的 联系 ,它们 各 自 有 自已 的 名 子 。 而 学 习 机 票 处 理 的 对 象 
是 成 千 上 方 的 数据 。 例 如 我 们 要 给 1000 个 数 典 值 ， 面 对 着 这 
伴 大 批 的 数据 ， 如 何 有 效 地 发 挥 学 习 机 的 特点 呢 ? 这 就 要 在 
这 些 数据 上 做 些 文章 。 我 们 把 有 内 在 连 系 的 一 批 数 进行 编 
组 ， 成 为 一 组 狼 ， 称 之 为 数组 。 给 它们 到 相同 的 名 子 ， 这 就 
是 数组 名 。 但 又 娶 给 它们 进行 编号 ， 这 就 是 下 标 。 

例如 将 20 名 学 生 的 数学 成 绩 编 为 一 组 ， 命 名 为 A， 那 么 
第 一 位 学 生 的 数学 成 绩 就 为 A(1) ,第 二 位 学 生 的 数学 成 绩 为 
A(2)……， 第 20 位 学 生 的 数学 成 绩 为 A(20)。 


那么 A(1)、A(2)、.……. A(20)， 分 别称 为 下 标 变量 。 
拍 导 由 的 1、2、.……. 20， 分 别称 为 下 标 ， 下 标 除 了 可 以 是 常 


激 凡 外。 还 可 以 是 蛮 量 、 开 达 式 ， 如 A(D，B(GI 二 JTJ) 等 而 
-172 ， 


有 下 标 变 量 本 身 也 可 以 作为 下 标 出 现 , 如 ,M(A(3)) 。 但 这 些 
变量 ， 表 达 式 等 预先 要 有 确定 的 值 ， 并 且 只 能 是 正 数 和 零 ， 
不 能 是 负数 ， 若 带 有 小 数 ， 计 算 机 会 自动 取 整 。 

数组 在 参加 运算 之 前 要 存放 在 内 存 中 ， 那 么 究 赏 要 给 数 
组 留 多 大 的 存 贮 空 间 呢 ? 必须 事先 通知 计算 机 ， 其 方法 是 通 
过 数组 说 明 语句 来 实现 。 格 式 如 下 ; 
| 行 号 DIM 数组 名 (〈 数组 元 素 下 标的 最 大 值 或 上 界 ) 

例如 ,刚才 我 们 举 的 表示 20 名 学 生 数 学 成 绩 的 数组 A ,就 
可 以 这 禅 来 说 明 : 

10 DIM A(19) 

如 果 在 同一 程序 中 需要 使 用 儿 个 煞 组 时 ， 可 以 在 狼 组 说 
明 请 名 中 同时 对 这 些 数 组 进行 说 明 ， 但 之 间 要 用 逗号 分 开 。 
如 ， 

i0 DIM A(10)，B(25)，C 叫 (15) 

如 果 下 标 值 不 超过 10 时 ， 不 用 事先 说 明 ， 可 以 直接 引 
用 。 

那么 究竟 引用 了 数组 各 下 标 变 量 之 后 ， 能 为 我 们 编程 带 
来 什么 方便 呢 ? 我 们 不 妨 来 做 个 岩 较 吧 ! 

前 面 我 们 在 初级 程序 设计 里 ， 曾 对 三 个 数 进行 从 大 到 小 
的 排列 ， 夫 做 了 六 次 比较 ， 如 果 我 们 仍然 采取 那 种 方法 对 
1000 个 数 进行 排序 的 话 ， 那 么 就 要 进行 499500 次 的 比较 。 若 
一 条 一 条 地 将 程序 写 出 来 ， 那 将 是 一 项 很 艰巨 的 工作 。 怎 么 
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办 妮 ? 我 们 用 数组 和 下 标 变 量 来 试 一 试 。 

首先 要 给 1000 个 变量 赋值 ， 如 果 我 们 仍 采用 初级 程序 设 
计 所 采取 的 赋值 方法 ， 就 过 于 麻烦 了 。 怎 样 才能 简便 呢 ? 我 
们 知道 ， 数 组 元 素 中 , 下 标 是 有 一 定 顺序 的 ;根据 这 一 特点 ， 
我 们 可 以 采取 循环 赋值 的 方法 。 其 次 是 排序 ， 我 们 用 双重 循 
环 来 实现 。 先 看 程序 ， 


1 
20 
3 
40 
50 
60 
70 
80 
90 


乙 


一 


DIM A(1000) 

FOR. I=1 TO 1000 

INPUT A(D) 

NEXT I 

FOR I=1 TO 999 

FOR J=I+1 TO 1000 

IE AG)>=A(J) THEN 90 
M=A(D:， AGOD =AGD)，AG) 一 M 
NEXT 可 


100 NEXT 1I 

110 FOR I=1 TO 1000 

120 PRINT JI “”; A(T) 

130 NEXT 1 

140 END 

这 个 程序 中 ，.20 一 40 号 语句 是 向 1000 个 变量 赋值 ，50 人 ~ 
100 号 语句 为 从 大 到 小 排序 ，110~140 是 将 1000 个 变量 按照 
从 大 到 小 的 顺序 输出 。 

解释 一 下 排序 的 过 程 ， 二 重 循环 中 ， 当 外 循环 变量 I 取 
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某 一 值 时 ， 例 如 I=1，A(1) 与 内 循环 变量 为 J=I+1 到 
1008 的 各 变量 值 A(2) 一 A(1000) 进行 比较 ， 革 有 大 于 A(1) 
的 则 变换 位 置 ， 和 否则 不 变 ， 使 A(1) 里 存放 的 数据 始终 为 最 
大 。 当 内 循环 结束 ， 便 选 出 一 个 最 大 数 A(L)， 然 后 A(2) 再 
依次 与 剩余 变量 比较 ， 取 出 第 二 大 数 A(2)》， 一 直 这 样 做 下 
去 ， 便 会 将 1000 个 变量 按照 册 大 到 小 的 顺序 排列 好 。 

这 几 ， 仅 仅 数 十 条 语句 便 可 将 1000 个 变量 排列 出 来 。 由 
此 看 来 ， 引 入 数组 和 下 标 变量 的 概念 能 帮助 我 们 解决 一 些 痰 
手 的 问题 ， 从 而 使 程序 更 简明 、 更 清晰 。 

[ 例 1] 计算 一 元 多 项 式 的 值 ， 即 ， 

2 (X%) 一 anX 十 an-1X 十 … 十 ao 

在 初级 程序 设计 里 ， 我 们 仅仅 能 对 某 一 个 较 低 次 数 的 具 
体 的 一 个 多 项 式 进行 处 理 ， 计 算 几 个 自 变量 所 对 应 的 多 项 式 
的 值 ， 而 对 要 编制 一 个 通用 的 、 能 计算 任 总 多 项 式 值 的 表达 
式 ， 就 显得 无 能 为 力 了 ， 数组 的 引入 使 这 个 问题 得 到 解决 。 

对 于 多 项 式 ， 2 轴 (x) 一 anx" 十 an-1X 十 … 十 aiXd co 

经 过 提取 公 因 式 ， 

gr(X) 一 ((((02Y% 十 aa) 迪 % 二 ao-1) 尖 X% 十 0) 汪 X 十 ai) 


尖 % 十 ao 
获 个 运算 被 分 解 为 下 列 符 部 分 ， 
思 0YX 十 an 
久 二 X 寺 da-l 
甸 一 2i-1 汪 % 十 On-; 
2 一 nlX% 十 Gn-m 一 轴 -1 党 %% 十 Ge 
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整个 问题 由 一 个 表 边 式 了 = Y#X 十 A 进行 车 平 次 选 代 
再 狗 自 。 我 们 于 A(I) 来 表示 一 元 多 项 葡 第 工 次 项 的 系数 ，N 
表示 的 方 次 ， 则 程序 如 下 ， 

10 READ N 

20 DIM A(CN) 

30 FORI=N TO 0 STEP -1 

40 READ AT) 

50 NEXT 1 

60 INPUT “请 输入 X 的 值 ”，X 

70 IF X= 一 1 THEN 160 

80 站 一 0 

90 FOR I=N TO 0 STEP -1! 

100.Y=YywX+A(CD) 

110 NEXT TI 

120 PRINT “=”， X，“Y=”， 立 

130 INPUT“ 还 继续 运算 吗 ? (Y/N)”; 5S$ 

140 IJF S$=“Y”THEN GOTO 60 

150 DATA.……， 一 1 

160 END 

这 样 当 我 们 依次 输入 多 项 式 的 次 数 、 系 数 和 x 值 后 ， 便 
可 计算 此 多 项 式 的 值 了 。 

[ 例 2] 选拔 运动 员 。 有 15 名 长 跑 运 动员 ， 参 加 1500 米 
长 跑 。 当 我 们 将 他 们 的 姓名 和 成 绩 键 入 计算 机 后 ， 要 求 按 和 名 
次 打印 出 他 们 的 姓名 、 成 绩 。 
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前 面 我 们 已 经 将 1000 个 数据 按照 由 大 到 小 的 顺序 进行 了 
排序 ， 因 而 这 个 问题 看 起 来 就 比较 简单 了 。 只 需要 在 排序 过 
程 交换 变量 时 ， 将 存放 姓名 的 字符 串 数 组 元 素 ， 一 起 交换 位 
置 便 可 。 程 序 如 下 ， 

i0 DIM A(15)，A 下 (15) 

20 PR# 

50 FOR I=1 TO 15 

40 INPUT“ 请 输入 运动 员 姓 名 ”， 和 A(D) 

50 INPUT“ 请 输入 运动 员 成 绩 ”， A(I) 

60 NEXT 1 

70 FOR I=1 TO 14 

80 FOR J=I+1 TO 15 

90 IJF A(GD)<=A(J) THEN GOTO 120 

100 M=A(D)，A(GD=A(J)，A(TD)=M 

110 M 员 =A 甩 (D)，A$(D=A 书 (J)，A 下 (J)=M$ 

120 NEXT 了 

130 NEXT II 

140 FOR I=1 TO 15 

150 PRINT “第 ”DB “名 ?，A$(D，A(D “种 " 

160 NEXT 1 

170 了 R#0 

150 ENPD 
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60 .打印 杨 辉 三 角形 
一 一 介绍 二 维 数组 和 双 下 标 变 量 
[ 例 1 
我 们 先 来 看 表 4-6， 这 是 常见 的 学 生成 线 统 计 表 。 


表 4-6 


这 个 表格 我 们 称 为 二 维 表格 ， 它 是 由 40 行 ( 除 表 头 外 )， 
六 列 组 成 的 ， 表 格 中 的 任何 一 项 ， 都 代表 了 某 学 号 学 生 某 门 
委 课 的 成 绩 。 例 如 第 二 行 第 三 列 ， 它 代表 了 学 号 为 2 的 辐 
学 的 数学 成 绩 ， 它 的 值 是 90， 也 就 是 为 90 分 。 假 如 我 们 将 这 
样 一 个 玫 格 作为 一 个 数组 处 理 的 话 ， 这 个 数组 中 的 各 个 元 
索 ， 必 需要 有 两 个 下 标 ， 一 个 下 标 代 表 它 在 表格 中 所 处 的 行 
! 一 个 下 标 代表 它 在 表格 中 所 处 的 列 号 。 假 如 我 们 为 这 个 
数组 取 名 为 A， 那 么 2 号 则 学 的 数学 成 绩 就 是 A(1，2) 一 一 
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这 就 是 双 下 标 变 量 的 表示 。 和 单 下 标 变量 的 规定 一 样 ， 它 的 
两 个 下 标 也 梢 以 是 变量 和 表 沁 式 ， 但 事先 一 叱 要 有 确 着 的 
值 ， 如 A(I，J) 、A(KTM，LT+TN) 等 ， 两 下 标 之 间 要 用 融 
号 分 开 。 同 样 ， 下 标的 值 不 能 为 负数 ， 劳 带 有 小 数 ， 计 算 机 
自动 取 整 。 

表 4-6 作为 数组 ， 就 称 为 二 维 数组 ， 取 名 为 A: 其 中 
每 一 个 双 下 标 变量 A(0，0)，A(0，1) 等 ， 被 称 为 其 数组 元 
素 。 数 组 元 素 名 和 它 的 值 是 两 回 事 ， 例 如 2 号 同学 数学 成 绩 
我 们 存放 在 A(1，2) 里 ， 它 的 值 为 90。 

二 维 数 组 和 一 维 数组 一 样 ， 为 了 使 计算 机 预 留存 凡 空 
间 ， 需 要 在 使 用 之 前 ， 即 程序 的 开头 加 以 说 明 。 

二 维 数 组 说 明 语句 格式 如 下 ; 


行 号 DIM 数组 名 (表达 式 1， 表 达 式 2 ) 


其 中 ， 表 达 式 1 给 出 第 一 个 下 标的 上 界 

表达 式 2 给 出 第 二 个 下 标的 上 界 。 

例如 ,上 面 的 二 维 数组 A ,其 说 明 语 句 就 应 写 为 :10 DIM 
A(39，5)8 代表 了 它 有 40 行 ， 6 列 ， 当 计算 机 接受 此 信息 
后 ， 便 会 留 出 40 x 6 一 240 个 存 贮 单元 。 下 面 我 们 一 起 来 完成 
这 张 表 格 的 打印 工作 。 

@ 分 析 ， 首 和 骆 要 将 人 数组 中 备 元 未 的 值 赋 给 各 下 标 变 
量 ， 一 维 数组 的 赋值 方法 是 采用 单 重 循环 来 实现 的 ， 那 么 二 
维 数组 就 要 采用 双重 循环 来 实现 。 同 样 ， 输 出 打印 也 穴 采 用 
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双重 循环 。 

久 程 序 如 Fr 

10 DIM Ad40，6) 

20 FOR I=1 TO 40 

30 FOR J=1 TO 6 

40 READ A(I，J) 

50 NEXT 

60 NEXT 1 

70 PRINT “学 号 ? ?3 “语文 2 办 “数学 ? 多 

4 人 破 汉 5 二 响 理 呈 4 攻 “化 学 

80 FOR I=1 TO 40 

90 FOR J=1 TO 6 

100 PRINT ACT D “ ，) 

110 NEXT 

120 PRINT 

130 NEXT 1 

140 DATA 1，90，85，88，92，94 

150 DATA 2，80，90，93，89，76 

1000 END 

在 这 个 称 序 里 ， 要 特别 注意 二 维 数组 在 内 让 申 的 排列 顺 
序 。 和 镶 忽 咯 了 这 个 问题 ， 就 会 使 数据 的 输入 输出 格式 达 不 到 
预定 效果 。 在 这 个 程序 里 ， 外 循环 变量 工 代 表 了 第 工人 个 下 
。t80 。 


标 ， 从 1 到 40, 实 际 含意 为 第 I 个 学 生 , 内 循环 变量 J 代 表 了 
第 三 个 下 标 ， 实 际 含意 为 第 门 功 课 。 在 输入 数据 时 ， 输 入 
的 顺序 是 一 个 学 生 的 信息 读 完 再 读 下 一 个 。 

[ 例 2] 打印 杨辉 三 角形 。 

在 数学 里 讲 到 ， 杨 辉 三 角形 的 每 一 行 是 (x 十 y) "的 展开 
式 的 各 项 系数 。 如 第 一 行 的 1 就 是 (x 十 思 )" 的 系数 ， 第 二 行 
1， 工 是 (x 十 :的 系数 ， 第 三 行 的 1，2，1 是 〈x 十 9 六 的 展 
开 式 六 十 2xg 十 纪 各 项 的 系数 ! 10 行 的 杨辉 三 角形 如 图 
4-16。 
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从 图 4-16 可 以 看 出 对 和 解 线 和 每 一 行 的 第 一 列 几 是 1， 其 

佘 各 项 是 它 的 上 一 行 中 前 一 个 元 素 和 上 一 行 的 硼 应 元 素 的 元 
素 之 和 。 例 如 ， 第 五 行 第 三 列 的 值 是 6 ， 它 是 第 四 行 第 二 列 
”181 。 


3 和 第 三 列 3 之 和 。 

因此 ， 我 们 先 将 每 行 第 一 列 和 对 角 线 元 素 赋 1 ， 然 后 ， 
再 赋 其 余 宛 琳 ， 最 后 将 输出 杨辉 到 角形 。 

图 4-17 是 程序 的 粗 框图 。 对 于 一 个 较为 复杂 的 程序 ， 我 
们 可 以 将 程序 的 几 个 大 部 分 分 别 画 出 框图 , 即 称 为 粗 框 图 , 然 
后 将 每 一 部 分 具体 程序 执行 路 线 细 画 出 来 。 这 样 采取 各 个 击 
破 的 方法 ， 问 题 就 会 迎刃而解 了 。 

下 面 我 们 将 “计算 其 余 元 素 ” 一 框 画 出 具体 程序 执行 路 
线 。 


@ 分 析 ， 其 余 元 素 是 一 个 二 维 的 玫 ， 因 此 对 于 它们 的 赋 
值 必 宠 要 用 双重 循环 。 外 循环 守 皮 控制 行 数 ， 从 第 三 行 开 始 
到 逢 IV 行 :内 循 攻 高 量 兵制 列 数 。 

@ 轩 “计算 其 余 元 素 ” 此 部 分 的 框图 如 图 4-18 ( 其 官商 部 
分 省 略 了 ) 。 

@@ 程 序 ， 

10 INPUT“ 请 输入 扬 辉 到 角形 的 行 数 ”; N 

20 DIM ACN，N) 

30 FOR I=1 TO N 

40 A(I，1) 一 1 

50 A(I，JL) =1 

60 NEXT [ 

70 FOR I=3 TO N 

80 FOR J=2 TO II 一 1 

90 A(I，J) =A( 一 1，J-1) 十 A( 一 1，J) 

100 NEXT J 

110 NEXT II 

120 FOR I=1 TO N 

130 FOR J=1 TO I 

140 PRINT A(L J)5 “ ?9 

150 NEXT j 

160 PRINT 

170 NBKRTT 

180 PRINT 
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190 .END 

我 们 在 计算 机 上 运行 此 程序 ， 只 要 输入 行 数 ， 便 会 输出 
相应 的 杨辉 三 角形 ， 若 想 打印 在 纸 上 ， 可 在 程序 前面 加 上 
卫 R#1。 


61. 哥 德 巴赫 犹 想 在 学 习 机 上 得 到 验证 
一 一 介绍 子 程序 (GOSUB/RETURN 语 名》 


前 面 我 们 曾经 打印 输出 学 生成 绩 表 ， 为 了 整齐 美观 ， 我 
们 准备 在 造 表 时 行 与 行 之 闻 都 要 加 上 间隔 线 ， 现 在 让 我 们 把 
这 个 程序 的 输出 部 分 拿 来 修改 加 工 ， 实 现 这 个 功能 ， 

5 DIM A(40，6) 

10 PRINT TAB(10)， “学 生成 绩 者 ? 表 头 


20 FOR TI=1 TO 80 


30 PRINT “一 ”3 打印 一 条 横 线 


40 NEXT 工 
50 PRINT 学 号 ?” 3 全 中 ， “语文 ? 3 6 多 $ “ 数 
学 ? 3 全 3 “政治 ?” ; 允 ; “物理 ?” ; 给 多 ; 
“化 学 ” 
60 FOR I=1 TO 80 
70 PRINT “一 ”$ 
打印 一 横 线 
80 NEXT I 
90 FOR TI=1 TO 40 
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100 FOR J=1 TO 5 

110 PRINT A( JJ) “4 >， 
120 NEXT J 

130 PRINT 


一 


140 FOR 玫 =1 了 O 80 

150 PRINT “一 ”) 打印 一 横 线 

160 NEXT 下 

170 PRINT 

180 NEXT I 

190 END 

从 上 面 程序 可 以 看 出 ， 多 次 运用 了 打印 横 线 这 一 段 和 
序 ， 每 次 用 到 都 要 重 写 一 遍 。 为 了 减少 程序 自 书 号 次 数 ， 同 
时 为 了 节省 内 存单 元 ,可 以 引进 子 程序 ,即将 多 次 用 到 的 程序 
外 作为 子 程序 ， 可 被 返 复 调 用 ， 能 够 调用 子 程序 而 本 身 不 被 
调用 的 程序 ， 称 为 主 程序 。 

主 程序 调用 子 程 序 要 用 转子 语句 ， 而 当 子 程序 执行 完 后 
要 返回 主 程序 ( 用 返回 请 名 ) 。 

格式 为 ， 

| 主 程 序 | GOSUB 子 程序 开始 行 号 | 


子 程序 上 RETURN -| 


ET 


其 功能 是 当主 程序 执行 到 GOSUB 语句 时 ， 训 转 和 执 和 
GOSUB 后 面 行 号 为 起 始 行 号 的 子 程序 。 当 子 程序 执行 
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后 ， 由 返回 语 名 RETURN 转 入 调用 子 程序 的 GOSUB 的 中 
一 行 号 语句 去 继续 执行 。 子 程序 是 主 程序 以 外 的 一 个 程序 , 因 
此 子 程序 一 般 编 号 在 主 程序 结束 之 后 的 程序 中 。 子 程序 还 本 
以 调用 其 他 子 程序 ， 称 为 子 程序 嵌 套 。 

现在 我 们 将 打印 输出 横 线 的 一 段 程序 作为 子 程序 ， 号 在 
主 程序 之 后 ; 


10 
20 
30 


40 
50 
60 
70 
80 
90 
100 
110 
120 
300 
310 
320 
330 
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PRINT TAB(10)， “学 生成 绩 表 ?” 
GOSUB 300 

PRINT “学 号 ”， “ ”;， “语文 ，“ 
学 ，“ ” 填 治 "4 ”， 物理" 
“化 学 ” 

GOSUB 300 

FOR I=0 TO 39 

FOR J=0 TO 5 

PRINT AL JJ) “2 

NEXT J 

PRINT 

GO9SUB 300 

NEXT 1 

END 

FOR 开 =1 TO 80 

PRINT “一 ”4 

NEXT 开 

RETURN 


人 名 
9 


多 人 
;入 


; 


它 的 执行 路 线 如 图 4-19。 


| 主 程序 本 程序 

| 

1 10 ~ 世 300 

| 20 GOSUB 300 2 310 

| .二 320 

， 40 GOSUEB 300 -330 RETURN 

| 50 5 

| 60 一 -一 一 

| 

| 和 

80 + 

| 90 GOSUB 300 

， 100 END 

LE rr vecrrrcrouaroaaamgcamean 和 
4-19 


首先 从 标号 10 的 主 程序 开始 执行 ，20 语 句 遇 到 GOSUB 
300 时 ， 转 去 执行 300.310、320, 执行 到 330 号 语句 RETURN 
时 ， 返 回 主 程序 GOSUB 的 下 一 语句 (30 号 语句 ) 再 顺序 执 
行 。 

从 上 面 修改 后 的 程序 可 以 看 出 ， 由 于 采用 了 子 程序 ， 去 
掉 许 多 重复 出 现 的 宛 余 程 序 ， 使 程序 更 加 精练 ， 更 加 模块 
化 ， 从 而 显得 结构 清晰 、 易 编 、 易 读 、 易 于 检查 错误 。 

子 程序 可 以 多 层 娩 套 ， 即 子 程序 可 以 有 更 小 的 子 程序 。 
其 执行 过 程 如 图 4-20。 
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Ra aiomamer 8 二 一- 一 -2 -二 Ca: 机 二 seunmom 


和 
主 程序 子 程序 1 子 程序 2 子 程序 3 
SS 0 500 1 2000 
和 
| 
GOSUB 1000 | 
GOSUB 2000 
RETURN 改 RETURN RETURN 
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子 程序 的 起 始 行 号 要 大 于 主 程序 的 结束 行 号 ， 这 是 为 了 
加 免 当主 程序 运行 完毕 后 ， 接 着 运行 实际 上 并 不 打算 再 去 运 
行 的 子 程序 。 

. ， ! 

[ 例 1 计算 组 合 数 CS ( C5= -下 ET) 

在 这 个 式 子 里 ， 三 次 用 到 阶乘 ， 因 此 ， 将 计算 阶乘 作为 
子 程序 处 理 。 程 序 如 下 : 

10 INPUT“ 请 输入 N，ER> ;NT 

20 S=N 

30 GO9UB 300 

40 D1=J 

50 9 一 开 

60 GO9S9UB 300 

70 D2=j 

80 S=N--K 

90 GOSUB 300 
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100 D,=] 

110 D=D,/(D, >，D,， 

120 PRINT “CO N 和 “2 攻 ， 2) =” 

130 END 

300 J=1 

310 FOR TI=1 TO S 

320 J 一 JJx* 工 

330 NEXT 1 

360 RETURN 

RUN 。/ 

请 输入 N，K? 5，3 

C(5，3) 一 10 

RUN 

请 输入 N， 玫 ? 10，6 

C(10，6) 一 210 

在 这 个 程序 里 ， 多 次 出 现 赋 介 语句 ， 大 家 可 以 分 析 一 下 
它们 的 作用 。 其 一 为 设置 调用 参数 ， 其 二 为 接收 返回 参数 。 

为 什么 要 考虑 调用 参数 和 返回 参数 呢 ? 这 是 因为 子 程序 
一 般 都 是 做 类 同 的 工作 ， 而 不 是 做 完全 相同 的 工作 。 例 如 在 
这 个 程序 中 ， 尽 管 都 是 求 阶 溢 ， 但 三 次 阶乘 的 参数 各 不 相 
闻 ， 因 此 在 调用 之 前 ， 须 将 参数 赋 于 子 程序 ， 而 所 谓 返 回 参 
数 ， 就 是 将 子 程序 的 结果 返回 到 主 程序 ， 其 中 S=N，S=N 
~- 民 ，S= 开 均 为 设置 调用 参数 ， 而 D,=J，D,=J，D:=】 
友 为 接收 返回 参数 。 
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[ 例 2] 编写 验证 500 一 100 之 间 


的 偶数 都 可 以 表示 为 二 个 素数 之 和 的 


形式 哥 德 巴赫 猜想 ) 。 

素数 的 定义 和 求法 前 面 我 们 已 经 
讲 过 ， 现 在 要 验证 ， 偶 数 = 素 数 十 素 
数 。 我 们 首先 取 一 个 小 的 素数 ， 从 已 
知 偶数 中 减 去 ， 验 证 璋 余 的 -一 个 数 是 
否 为 素数 。 若 是 ， 我 们 用 工 =1 来 表 
示 ， 工 作 完 成 ， 若 不 是 ， 再 将 第 一 
个 素数 值 增 大 ， 从 已 知 偶数 中 减 去 ， 
再 次 验证 璋 余 的 一 个 数 是 否 为 素数 。 


个 素数 为 止 。 


我 们 将 判断 素数 的 过 程 作 为 子 程 


序 来 处 理 。 框 图 如 图 4-21。 

程序 如 下 ， 

10 FOR M=50 TO 100 
STEP 2 

20 内 =1 

30 观 王 到 十 1 

40 了 = 册 

50 GOSUB 300 

60 IF S=0 THEN .30 

70 Y=M 一 风 


* 1T90。 


芝 的 二 0 
之 间 的 偶数 


和 。 


80 下 王立 

90 GOSUB 300 

100 IE S=0 THEN 30 

110 PRINT Mi “= W3 “十 ”YY 
120 NEXT M 

130 匡 ND 

300 9 一 0 

310 FOR I=2 TO SQR(CP) 

320 IF P/I=INTIP/D THEN 350 
330 NEXT 1 

340 9 一 1 

350 RETURN 


50 一 3 十 47 
52 一 5 十 47 
54 王 7 十 47 
56 王 3 十 53 
58 王 5 十 53 
60 王 7 十 53 
62 王 3 十 59 
64 一 3 十 61 


经 过 验证 50 一 100 之 间 的 偶数 均 可 以 表示 为 二 个 素数 之 
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62 .函数 家 族 
~ 一 介绍 标准 函数 和 自 定 义 函 数 


BASIC 语 言 中 函数 主要 分 为 两 大 类 :, 一 类 是 标准 函数 ， 
它 是 由 BASIC 系统 提供 的 内 部 函数 ， 另 一 类 是 自 定义 芒 
数 ， 它 是 由 用 户 自 己 根据 需要 而 定义 的 函数 。 

前 面 我 们 已 经 接触 过 不 少 函 数 , 旭 取 整 函数 INT(X)、 平 
方 根 函 数 SQR(X)、 三 角 函 数 SIN(X) 和 随机 函数 RND(X) 
等 ， 均 属于 标准 函数 。 标 准 函 数 包 括 三 角 函 数 、 算 术 函 数 、 
字符 串 函 数 和 其 它 一 些 函数 几 类 。 

(1) 标准 函数 是 由 BASIC 语言 解释 程序 束 先 已 经 编制 
好 的 函数 ， 因 而 我 们 在 使 用 时 可 以 直接 调用 。 

中 三 角 函 数 和 算术 函数 

这 两 类 函数 比较 简单 ， 使 用 时 只 要 写 出 呆 数 名 和 自 变 量 
就 可 以 了 。 现 将 函数 和 功能 列 于 表 4-7。 

包 字 符 串 函数 

A.。 LEN 是 用 来 测量 字符 串 长 度 的 。 字 符 串 长 度 指 字 
符 串 内 字符 的 个 数 ， 其 中 包括 空格 、LEN(X 和 d ) 就 是 用 来 
测量 字符 串 双 和 $ 中 所 包含 的 字符 的 总 数 。 

例如 ，10 A 吕 = “ABCDEFG” 

20 PRINT LEN(A$) 
30 END 
RUN 


”192 ， 


函数 |BASIC 符 号 | 会 义 说 明 和 例子 
es Ne 
正 芒 函数 | <INCX) | 求 X 的 正弦 但 三 角 函 数 中 的 变量 z， 
余 了 函 数 “| COSCX) | 求 X 的 余 络 值 一 笋 以 弧度 为 单位 
正切 函数 | TAN(CX) | 求 X 的 正切 估 例如 ，SIN45" 应 写 为 
| 
反正 切 函 数 ANT(X) 求 又 的 反正 切 值 SIN(45s3.1416/180) 
平方 想 画 数 | SQR(X) | 求 X 的 平方 机 本 全 信人 本 全 下 
指数 函数 EXP(X) 求 ex 值 | 〈e 一 2.7182818) 
时 数 | | 例 LOG(3) 二 0.47712128， 
| 对 教 盏 数 训 | LOGCX) | 求 logloX 的 全 en 
人 二 
多 对 值 类 | ABSCX) | 求 X 的 对 位 | 例 ABS( 一 5.5)=5.5 


B .LEFT$，MID 和 $，RIGTIT 下 是 用 来 取 子 字符 嫂 


的 。 有 时 我 们 需要 处 理 字符 串 中 某 一 部 分 ,这 一 部 分 我 们 就 叫 
做 字符 串 的 子 字符 串 , 如 人 下 = “ABCDE”, 则 字符 串 "A”， 
“AB”， “ABC”，“D?” ， “CDE”， “ABCD，， 
“BCDE” 等 都 是 “ABCDE” 的 子 字符 串 。 而 LEFT 中 、 
MID$、RIGHT$ 三 个 函数 就 是 用 来 从 字符 串 中 取出 -部 
分 字母 组 成 新 的 字符 串 。 

LEFT$(X 囊 ，N) 是 从 X 串 字符 串 中 左边 的 第 一 个 字 
符 开 始 取 起 ， 共 取 太 个 字符 。 如 ; 

10 人 由 一 “HASIC” 
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20 卫 和 蔬 =LEFT 有 (A 和 下 ，3) 

30 PRINT By$ 

40 ND 

RUN 

BAS 

MID$(X 和 ，P，N) 是 从 字符 串 叉 岂 中 第 P 个 字符 开 
始 取 ， 兴 取 N 个 ， 也 可 以 写成 MID(X 和 书 ，P) 是 从 字符 虽 
X$ 中 第 P 个 字符 开始 取 ， 一 直到 字符 串 末 尾 。 如 ， 

10 A 囊 = “BASIC” 

20 B 叫 =MID$ 书 (A 和 $$，3，2) 

30 PRINT B$ 

40 卫 ND 

RUN 。/ 

SI 

RIGHT$(X$，N 是 取出 字符 串 X$ 中 最 右边 的 N 个 
字符 ， 如 ， 

10 A 和 天 “BASIC” 

20 B 囊 王 RIGHT 叫 (A 吊 ，3) 

30 PRINT B$ 

40 下 ND 

RUN ./ 

SIC 

C . 字符 串 是 可 以 连接 的 。 两 个 或 几 个 字符 串 可 以 用 
“十 ”号 连接 起 来 。 如 
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10 人 出 = “IT AM Ay? 

20 及 $ 王 “STUDENTY?” 

30 C 叫 王 A 叫 十 B$ 

40 PRINT C 

50 END 

RUN 

IAM A STUDENT 

D. STR$ 和 VAL 是 数字 变换 器 。STR$ 和 VAL 分 
剧 可 以 将 一 个 数学 表达 式 的 值 转换 成 字符 串 或 将 字符 串 转 换 
成 数学 表达 式 ， 如 ， 

LI0 A=12，B=3，C=A 人 A++B 

20 C 书 =STR 叫 (A) 十 STR 员 (B) 

30 PRINT C，C$ 

40 匡 ND 

RUN 

15 123 

其 中 15 为 数字 ， 而 123 为 字符 串 。 又 如 :， 

10 A 串 =“123456? 

20 B=VALIA 和 ) 

30 C= 一 654321 十 B 

40 PRINT A 引 

50 PRINT B 

60 PRINT C 

“0 互 ND 


对 ， 


123456 不 是 数字 ， 是 字符 吕 。 
123456 这 是 数字 。 
7 7 


下 .ASC 和 CHR 和 $ 是 亲 威 。ASC(X$) 是 将 字符 串 
入 $ 中 第 一 个 字符 转换 成 ASCII 码 。ASCII 是 American 
Standatrd code for Information Interfchange (美国 信息 
交换 标准 代码 ) 的 缩写 。 计 算 机 用 的 全 部 守 符 都 是 建立 在 
ASCII 码 的 基础 上 的 ， 字 符 的 ASCII 代 码 最 大 是 255。 如 ， 

10 PRINT ASC(“A”)， 

20 PRINT ASC(“ABC” )， 


30 二 币 王 “Z9 
40 PRINT ASC(CT 册 ) 
50 END 
RUN 。y/ 
65 65 90 


而 CHR $《〈 数学 表达 式 ) 却 是 将 数学 表达 式 值 的 ASCIHI 
码 转 换 成 它 所 代表 的 字符 ， 如 : 

10 PRINT “CHRR 下 (65) 王 ”CHRJ 和 (65) 

20 PRINT “CHR 中 (90)= 王 ”CHR 员 (90) 

30 下 ND 

RUN 

CHR 册 (65) 一 人 

已 HR 钊 (90) == 委 
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以 上 将 字符 函 数 全 部 介绍 完了 。 其 它 一 些 函 数 大 部 分 
前 面 已 经 作 了 介绍 ， 如 取 整 函数 INT(X)、 打 印 格式 函 数 
TAB(X) 和 随机 函数 RND(X) 这 里 就 不 再 重复 了 ， 只 有 符 
号 函数 SGN(X) 还 没有 和 大 家 见 过 面 ， 下 面 就 来 熟悉 一 下 。 
SGN(X) 是 取 X 的 符号 ， 当 和 >0 时 ， 则 为 15 当 入 =0 
则 为 0 当 X<0 时 ， 则 为 一 1。 如 
10 PRINT SGN(500) 
20 PRINT SGN(0) 
30 PRINT SGN( 一 3.3) 
40 到 ND 
RUN -./ 
0 
一 
(2) 自 定 义 函 数 一 一 DEF EN 
前 面 已 经 介绍 了 各 种 标准 函数 ， 在 编程 序 的 过 程 中 ， 有 有 
时 需要 重复 计算 某 一 表达 式 的 值 ， 而 引入 自 定 义 函 数 。 

自 定义 函数 的 格式 如 下 : 


DEF FN 函数 名 (X) -ax | 


FRR 


时 


直 


其 中 ，DEF 是 定义 符 ; 
FN 是 函数 标记 
函数 名 可 以 是 A~ 一 2 中 任 一 个 字 母 
187。 


括号 中 的 X 是 形式 变量 ; 
表达 式 是 含有 X 的 BASIC 表 达 式 ， 也 就 是 所 要 定 
义 的 函 煞 式 。 

这 样 ， 便 可 以 用 等 号 左边 的 式 子 来 代 殖 等 号 右边 的 表达 


[ 例 ] 已 知 函 数 了 一 5X3? 十 4X2 十 3X -HL1， 当 X 由 工 变化 
到 10 时 ， 求 Y 的 值 。 

程序 如 下 ， 

10 DER FNY(X) 王 53#X 人 3 二 4s 和 人 2 十 3% 叉 十 1 

20 FOR I=1 TO 10 

30 PRIN] FNY(D) 

40 NEXT 工 

50 END 

首先 将 5X3 十 4X 十 3X 十 1 定义 为 ENY(X)， 其 中 为 
形式 变量 ， 当 程序 执行 到 40 号 语句 时 ， 调 用 了 此 函数 ， 但 自 
变量 换 成 了 LI， 根据 工 取 不 同 的 值 代 入 表达 式 ， 从 而 计算 出 
Y 值 来 。 


-111O2 \。 
7 


例 2] 计算 在 不 同 速度 下 的 动能 ( 已 = 


程序 如 下 ; 

10 DEF FNERE(CV)= 一 1/2* MyVf+2 

20 M=5.5 

30 V = 三 3.5 

40 PRINT FNE(V》，FNE(Vs2)，FNE(CVw3) 
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50 END 

上 面 程序 可 以 把 速度 为 V、2V、3YV 的 动能 显示 在 屏幕 
上 ， 当 一 个 长 的 程序 多 次 使 用 同一 函数 时 ， 用 自 定 义 函 数 特 
别 方便 。 

但 是 在 使 用 自 定 义 函数 时 ， 也 必须 遵循 一 些 具 体 的 规 
定 ， 每 条 自 定义 函数 只 允许 在 程序 中 的 一 行内 写 完 ， 如 果 过 
长 或 过 于 复杂 ， 可 以 拆 成 几 条 自 定义 函数 语句 来 定义 。 


63 .学 知 管 理 模型 
一 一 介绍 结构 化 程序 设计 


模块 结构 化 程序 设计 是 目前 提倡 的 程序 设计 方法 ， 它 是 
将 比较 复杂 的 问题 化 为 许多 独立 而 又 易于 解决 的 简单 问题 ， 
将 问题 由 繁 到 简 地 逐步 解决 。 程 序 设计 得 层次 清楚 ， 易 于 阅 
读 和 修改 ， 是 解决 复杂 问题 的 一 种 有 效 方法 。 

本 节 以 中 学 学 生成 绩 管理 为 实例 ， 当 然 ， 真 正 的 学 生成 
绩 管 理 要 复杂 得 多 ， 但 通过 这 个 模型 ， 学 会 运用 已 经 学 过 的 
程序 设计 技巧 ， 提 高 程序 设计 能 力 ， 更 有 效 地 解决 实际 问 
题 。 

总 的 原则 是 ,首先 搞 清楚 你 所 要 设计 的 程序 需要 娜 几 方 
面 的 功能 ， 从 而 确定 划分 为 若干 个 模块 ， 画 出 模块 层次 图 ; 
对 每 一 个 模块 又 要 分 析 它 需要 哪 几 个 功能 ， 进 而 分 成 更 小 的 
模块 。 这 就 是 模块 结构 化 程序 设计 。 

《1) 分 析 

我 们 现在 要 设计 的 是 其 一 个 班 的 学 生成 绩 管 理 档 
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所. 
假设 某 班 有 N 和 名 同学 〈 每 位 同学 对 应 有 学 号 ， 姓 名 ) ， 
M 门 功课 ， 要 计算 机 计算 全 班 同 学 的 总 平均 成 绩 、 某 一 科 的 
平均 成 线 、 每 一 个 学 生 的 平均 成 线 ， 要 将 某 一 门 功课 按 分 数 
段 进行 统计 分 析 ， 要 将 全 班 同学 按 成 绩 排名 次 。 当 输入 学 科 
编号 之 后 ， 计 算 机 应 自动 查询 此 学 科 平 均 分 及 此 学 科 成 绩 分 
析 结 果 ， 当 输入 某 学 生 学 号 之后， 可 查询 此 学 生 各 科 成 
绩 、 平 均 分 数 、 名 次 ， 最 后 输出 以 下 信息 ; 

@ 按 学 号 顺序 打印 输出 全 班 各 同学 的 姓名 ， 各 门 功课 成 
绩 ,平均 分 、 名 次 

加 按 名 次 打印 输出 全 班 各 同学 的 学 号 、 姓 名 、 各 门 功课 
成 绩 、 总 平均 成 绩 。 

对 于 这 样 复杂 的 问题 ， 在 编程 序 之 前 要 仔细 分 析 ， 然 后 
分 出 模块 并 画 出 模块 图 。 

根据 需要 的 功能 大 致 分 为 以 下 6 个 模块 ， 

A . 建 档 模块 ， 功 能 是 接收 信息 。 

B ,计算 模块 ， 主 要 是 计算 全 班 总 平均 分 ， 某 一 科 的 平 
均 分 ， 每 个 学 生 的 平均 分 。 

C .统计 分 析 模 块 ， 功 能 是 将 某 科 考 试 成 绩 划 分 为 分 数 
段 ， 进 行 分 析 统计 。 

D ,排序 模块 : 其 功能 是 将 学 生成 绩 按 由 高 到 低 的 次序 
进行 排列 。 

下 ,查询 模块 ，a, 查询 班级 总 平均 分 。b. 查 询 某 学 科 平 
均 分 .查询 某 科 成 绩 分 析 结 果 } d ,查询 某 学 生成 线 、 平 均 
ea 200。 


分 、 名 次 。 

上 .打印 模块 ，a. 按 学 号 打印 成 绩 、 平 均 分 、 名 次 ，b， 
按 名 次 打印 成 绩 、 学 号 、 平 均 分 。 

(2) 框图 

全 模块 层次 如 图 4-22。 


pretrT-rrsrrecTTLC 一 于 To 


| ; | 查 输 ! 学 
站 | | 其 询 入 上 习 和 
全 | | 基 班 名 ! 成 次 信 
班 | | 科 总 次 续 ' 输 息 

学 | 均 侈 
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凶 主 程序 模块 框图 如 图 4-23。 
图 计算 模块 框图 如 图 4-24。 
国 统 计 分 析 各 科 成 绩 模块 框图 如 图 人 25。 
回 排 序 模块 框图 如 图 4-26。 
图 查询 学 生 学 习 成 绩 模块 框图 如 〈 图 4-.27 ) 。 
< 201。 


功能 编号 工 要 


< 二 ]， 
X 


< 人 > ]| 


和 


一 一 一 一 -一 -一 一 一 一 一 一- 一 一 一 一 一 一 一 -一 一 -一 


团 4-23 
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加 打 押 给 用 模 夫 框图 如 《〈 国 428 ) 。 


一 


林 询 班 线 |  ， 
总 平均 分 | 衣 


二 


图 4-28 


(3) 数组 定义 一 览 表 
人 囊 (M) 一 课程 名 X(CN)-- 中 间 数 组 ，S(CN) 一 学 号 
"203" 


XP(CN) 一 某 个 学 生平 均 分 AS$(N) 一 姓名 5 D(D-- 某 分 
数 段 人 数 ，A(I,J) 一 某 学 生 某 科 成 绩 : PIN) 一 名 次 :3 
&(CM) 一 某 学 科 总 分 开 P(M) 一 某 学 科 平 均 分 。 

(4) 程序 编制 

全 主 程序 


10 
20 
30 
4 
50 


一 


60 


70 
80 
90 


HOME 

INPUT“ 请 输入 班级 编号 ”; N$ 

INPUT“ 请 输入 班级 人 数 ”， 

INPUT“ 请 输入 功课 门 数 ”，M 

DIM SCN)， AS$CON)， A(N，M)， KKS$(M)， 
XCN)，XP(CN)，K(OM)，KP(OM)，D(11)， 
PCN) 

PRINT TAB(8)， NS$  “ 班 学 生成 绩 管理 系 

PRINT TAB(12)， “功能 表 ? 

PRINT“1 .建立 学 和 学 习 成 绩 档案 ” 

PRINT“2 .计算 学 生 学 习 成 绩 ” 


100 PRINT“3 .统计 分 析 学 生 学 习 成 线 ” 

110 PRINT“4 .将 学 生 学 习 成 绩 排名 次 ” 

120 PRINT“5 .查询 学 生 学 习 成 线 ” 

130 PRINT “6 .打印 学 生 学 习 成 绩 囊 ” 

140 INPUT“ 请 键入 你 所 需要 的 功能 编号 ( 若 想 退出 


操作 请 键入 0 )”;， 


150 IF 寺 一 1 了 再 有 EN GOTGO 240 


204。 


T60 IJF 工 =2 THEN GOTO 260 
170 IF 工 =3 THEN GOTO 280 
180 IF 直 =4 THEN GOTO 300 
190 IF 工 =5 THEN GOTO 320 
200 IF 工 =6 THEN GOTO 340 
210.IF 工 =0 THEN GOTO 360 
220 PRINT“ 你 输入 的 功能 编号 错 了 ， 请 重 新 痊 入 ” 


230 GOTO 60 

240 GOSUB 500 ， 转 建 档 模块 
250 GOTO 60 返 菜 单 

260 GOSUB 1000 “” 转 计算 模块 


270 GOTO 60 返 主 菜单 

280 GOSUB 1800 ” 转 统 计 分 析 模 块 

290 GOTO 60 返 主 菜单 

300 GOSUB 2000 “” 转 排序 模块 

310 GOTO 60 返 主 菜 单 

320 GOSUB 2500 ” 转 查 讯 模块 

330 GOTO 60 返 主 荣 单 

340 GOSUB 3500 “” 转 打 印 输出 模块 

350 GOTO 60 返 主 菜单 

360 END 

很 明显 ， 主 程序 的 作用 是 接收 班级 编号 、 班 级 人 数 、 功 
课 门 数 ， 然 后 定义 数组 ， 显 示 主 菜单 〈《 功能 表 》， 接 收 操作 
者 村 执 行 的 功能 编号 ， 然 后 执行 此 功能 。 


> 
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@@ 建 立 学 生 学 习 成 绩 料 案 撕 块 程序 ， 

500 REM 建 去 学 生 学 习 成 线 沿 罕 

510 HOME 

520 PRINTI“ 建 立 学 生 学 习 成 档 案 ” 

5380 PRINT“ 输 入 各 门 功课 课程 名 ? 

540 FEOR I=1 TO M 

550 PRINT “第 ”， 工 上 “ 门 功课 ”” :INPUT KKS(CD 

560 NEXT 工 

570 PRINT “输入 学 号 、 姓 名 及 各 门 功课 成 绩 ? 

580 FOR 1 TON 

590 INPUT 二 “学 号 ” ;5S(D) 

600 INPUT “姓名 ?3A(D) 

610 FOR J=1 TO M 

620 PRINT 下 出 (JJ :INPUT A(GI，J) 

630 NEXT 

640 NEXT I 

650 RETURN 

其 中 500 号 语句 为 注释 语句 ， 为 阅读 程序 带 来 方便 。 

在 上 面 程序 里 ,我 们 接收 了 这 几 个 方面 的 数据 :各 门 功 课 
课程 名 ， 如 语文 、 效 学 等 ， 并 存 入 下 上 则 多 组 里 。 每 个 学 生 
的 学 号 存 入 5 数组 里 ， 姓 名 存 入 A$ 数 组 ， 各 门 功课 成 绩 存 
入 A 数 组 里 。 

轩 计 算 学 生 学 习 成 绩 模 块 程序 ; 

1000 REM 计算 学 生 学 习 成 绩 


an。 


1020 
1030 
1040 
1050 
1060 
1070 


1080 
1090 
1100 
1110 
1T120 
1130 


1140 
1150 
1160 
1170 
1180 
1190 
1195 
1200 
1205 
1210 


HOME 

PRINT TAB(8)，“ 计 算 学 生 学 习 成 绩 ” 
PRINT “1 .计算 全 班 总 平均 分 ? 

PRINT “2 .计算 某 一 学 科 总 平均 分 ” 
PRINT “3 .计算 全 班 每 个 学 生平 均 分 ” 
PRIN 人 “请 你 选择 其 中 任 一 种 操作 〈1/2/3)， 苏 
要 返回 主 菜单 请 键入 0? 

INPUT N， 

IF N,=1 THEN GOTO 1140 

IF N,=2 THEN GOTO 1160 

IF N,=3 THEN GOTO 1180 


IF N =0 THEN GOTO 1195 

PRINT “你 的 功能 编号 键 错 了 ， 请 再 来 一 次 ”， 
GOTO 1070 

GOSUB 1200 ”一 一 转 计算 班级 总 平均 分 
GOTO 1000 一 一 返 计算 模块 功能 表 
GOSUB 1400 -一 转 计 算 某 一 科 平 均 分 
GOTO 1000 一 一 返 计算 模块 功能 表 
GOSUB 1600 ”一 一 转 计 算 每 个 学 生平 均 分 
GOTO 1000 一 一 返 计算 模块 功能 表 
RETURN 一 一 返 主 菜单 〈 主 程序 功能 表 》 
REM 计算 全 班 总 平均 分 

HOME 

PRINT“ 计 算 鲍 班 总 平均 分 ” 
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1215 
1220 
1230 
1240 
1250 
1260 
1270 


1280 
1290 


FOR I=1 TO N 
FOR J=1 TO M 


Z=Z+A(G，DJ) 一 一 计算 总 分 

NEXT > 

NEXT 1 

B,=INT(Z/(N* M))* 10 十 0.5)/10 
一 一 计算 总 平均 分 

PRINT“ 全 班 总 平均 分 是 ，”， B， 

RETURN 


这 个 程序 比较 简单 ， 要 说 明 的 是 ， 计 算出 的 全 班 总 平均 
分 ， 是 按照 四 舍 五 入 后 保留 一 位 小 数 来 处 理 的 。 
巾 计算 某 学 科 平 均 分 : 


400 
410 
1415 
1420 
1430 


1440 
1450 
1460 
1470 
1480 
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REEM 计算 某 学 科 平 均 分 
HOME 
PRINT“ 本 学 期 课程 及 编号 如 下 : ” 
FOR I=1 TO M 
PRINT 1 “ ”， 长 $(T)， 
一 一 显示 全 部 学 科 及 编号 
NEXT I 
PRINT 
INPUT “请 输入 要 计算 平均 分 的 学 科 编 号 ”，] 
玫 (]) 一 0 一 一 所 选 学 科 总 分 单元 清 零 
FOR I=1 TON 


1400 人 (JJ) = 攻 ( 人 十 ACT JJ) -一 计算 所 选 学 科 总 分 
1500 NEXT I 
1510 KRP(J) = 一 INT(GKR(COJD)ANX10-+0.5)710 
一 一 计算 所 选 学 科 平 均 分 
1520 PRINT 开 囊 (])8 “平均 分 为 ”， 到 P(J) 
1530 RETURN 
@@ 计 算 每 个 学 生平 均 成 绩 : 
1600 REM 计算 每 个 学 生平 均 成 绩 
1610 HOME 
1620 PRINT“ 正 在 计算 每 个 学 生平 均 分 ” 
1630 FOR I=1 TO N 


1640 X(TD) =0 一 将 每 个 学 生 总 分 单元 清 零 
1650 FOR J=1 TO M 
1660 X(D 一 XCD 十 A(G， 少 一 一 求 每 个 学 生 总 分 


1670 NEXT j 
1680 XP(D =INTCNXCDVMa 10 十 0.5)710 
一 一 求 每 个 学 生平 均 分 
1690 NEXT I 
1700 RETURN 
回 统计 分 析 某 学 科 成 绩 模 块 程序 ， 
1800 REM 统计 分 析 某 学 科 成 绩 
1810 HOME 
1815 PRINT “本 学 期 所 学 课程 及 编号 如 下 ，， 
1820 FOR TI=1 TO M 
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1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 


1905 
1910 


1912 
1915 


1920 


1925 


1930 


940 
1950 


PRINT I ， 允 $(J) 
NEXT TI 
PRINT 
INPUT“ 请 输入 要 统计 分 析 的 学 科 编 号 ”; 】 
FOR I=0 TO 10 
D(I) =0 一 一 将 本 科 每 分 数 自 人 数 单元 清 零 
NEXT I 
FOR I=1 TON 
X=INT(A(I，J)/10) 一 一 
计算 每 分 数 段 人 数 
D(X)=D(CX) 二 1 一 一 
NEXT II 
PRINT “100 分 的 ”TAB(10)，D(10); “人 > 


TAB(20);“ 占 总 人 数 ? ;INT(CD(10)7/N*10000) 
/1008 “ 邦 ” 一 一 输出 100 分 的 占 总 人 数 的 百分数 
FOR 玫 =9 TO 0 STEP 一 1 

PRINT 玫 * 108 “分 一 ”5 民 * 10 十 9 “分 ?5 
TAB(10)5 DGK) “人 ”); 

PRINT TAB(20) “ 占 总 人 数 的 ”， 
INTCD(GK) 7/ Ns10000) /1008 “ 吃 ? 

NEXT 开 一 一 输出 各 分 数 段 人 数 占 总 人 数 百 分 数 
RETURN 


@@ 排 序 模块 程序 ， 


2000 


2D10 。 


REM 排序 


2010 PRINT “正在 排序 

2020 FOR I=1 TO N 

2030 X(D =XP(TD) 一 一 将 每 个 学 生平 均 分 送 中 间 数 
组 

2040 NEXT 

2050 FOR I=1 TO N 一 1 

2060 FOR J=I+1 TO N 

2070 IF X(GD) >=XCJ) THEN 2110 

2080 工 =X(D 

2090 X(TD 一 X(J) 

2100 X(J) 一 个 

2110 NEXT 可 

2120 NEXT 一 一 以 上 为 从 高 到 低 排 序 

2130 FOR TI=1 TON 

2140 FOR J=1 TO N 

2150 IF XP(TD 才 >XCJ) THEN 2180 

2160 P(T) =J 

2170 GOTO 2190 

2180 NEXT 林 

2190 NEXT I 一 一 以 上 是 将 排 好 的 名 次 存 入 P 数 组 

2200 RETURN 

@ 查 询 学 生 学 习 成 绩 模块 程序 ; 

2500 REM 查询 学 生 学 习 成 绩 

2510 HOME 


2 


PRINT TAB(8)， “查询 学 生 学 习 成 线 ? 
PRINT “1 .查询 班级 总 平均 分 ” 

PRINT“2 . 查询 某 学 科 平 均 分 ? 

PRINT “3 .查询 某 学 科 成 绩 分 析 结 果 ?” 
PRINT“4 . 输入 学 号 查询 此 学 生 姓 名 、 各 科 成 
绩 平均 分 、 名 次 ” 

PRINT“5 .输入 名 次 ,查询 此 学 生 学 号 .姓名 、 
各 科 成 绩 、 平 均 分 ” 

PRINT “请 选择 以 上 功能 编号 ， 若 要 退出 ， 返 主 
菜单 ， 请 键入 0”4 


INPUT N5 

IF N5=1 THEN GOTO 2660 

IF N5=2 THEN GOTO 2680 

IF N5=3 THEN GOTO 2700 

IF N5=4 THEN GOTGO 2720 

IF N5=5 THEN GOTO 2740 

IF N5=0 THEN GOTO 2760 

GOSUB 1200 一 一 转 计算 班 平 均 分 
GOTO 2510 

GOSUB 1400 一 一 转 计 算 某 学 科 平 均 分 
GOTO 2510 

GOSUB 1800 一 一 转 某 学 科 计算 分 析 结果 
GOTO 2510 

GOSUB 2800 一 一 转 按 学 号 查询 


2730 
2740 
2750 
2760 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
3000 
3010 
3200 
3210 
3220 
3230 
3240 
3250 


GOTO 2510 


GOSUB 3200 一 一 转 按 名 次 查询 
GOTO 2510 

RETURN -一 一 返 主 菜单 
REM 按 学 号 查询 

HOME 


INPUT“ 请 输入 所 要 查询 的 学 生 学 号 ”5 下 


FOR I=1 TO N 

IF K=SG) THEN GOTO 2860 
NEXT [ 

PRINT “姓名 :，>”;A 岂 (IT 
PRINT “各 科 成 绩 为 ，” 

FOR 天 -=1 TO M. 

PRINT K$(K)， “3 A(G，K) 
NEXT 开 

PRINT “平均 分 ，”:，XP(D) 
PRINT “名 次 ， ”;， 了 P(D) 
RETURN 

REM 按 名 次 查询 

HOME 
INPUT“ 请 输入 所 要 查询 的 名 次 "; 长 
FOR I=1 TON 

IF K=PG) THEN 3260 
NEXT 
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3260 PRINT “学 号 ，”;，5S(0UD 

3270 PRINT“ 姓 名: ”j， A 出 (LT) 

3280 PRINT “各 科 成 绩 为 : 

3290 FOR 开 =1 TO M 

3300 PRINT 开 叫 (人 )3 “:” 3 A(L 开 ) 

3310 NEXT 开 

3320 PRINT “平均 分 ”;， XP(D) 

3330 RETURN 

@ 打 印 输出 模块 程序 

3500 REM 打印 输出 学 生成 绩 

3510 HOME 

3530 PRINT TAB(8)， “打印 输出 学 生成 绩 ? 

3540 PRINT“1 . 按 学 号 打印 输出 成 绩 表 ” 

3550 PRINT“2 ， 按 名 次 打印 输出 成 绩 表 ” 

3560 INPUT“ 请 输入 功能 编号 ”， 若 想 退 出 请 键入 
0”5 Ns 

3570 IF Ne=1 THEN GOTO 3600 

3580 IF No=2 THEN GOTO 3620 

3590 IF Ne=0 THEN GOTO 3640 

3600 GOSUB 3700 

3610 GOTO 3510 

3620 GOSUB 3900 

3630 GOTO 3510 

3640 RETURN 
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3700 
3710 
3715 
3720 
3730 
3740 
3750 
3760 
3770 
3780 
3790 
3800 
3810 
3820 
3830 
3840 
3850 
3860 
3900 
3910 
3920 
3930 
3940 
3950 


REM 按 学 号 打印 输 浊 学 生成 绩 表 
HOME 

卫 肛 # 

FRINT TAB(16); “学 生 学 习 成 绩 表 ” 


PRINT TAB(3)， “学 号 ”TAB(8) 王 姓名 
PRINT TAB(13)， “平均 ”TAB(21)3 名 次 ， 
FOR I=1 TO M 

PRINT TAB(5*I 二 21)8 下 (T) 

NEXT 

FOR I=1 TON 

PRINT TAB(3)。 SG(D TAB(8) A 和 (2); 
PRINT TAB(15)， XP(GD， TAB(21)，P(CD， 
FOR J=1 TO M 

PRINT TAB(5*J 二 21)3 和 (I，J) 

NEXT 林 

PRINT 

NEXT T 

RETURN 

REM 按 名 次 打印 输出 学 生成 绩 表 

HOME 

PRINT TAB(6)5 “学 生 学 习 成 绩 表 ” 
PRINT TAB(3) “名 次 "5 TAB(8)5 “姓名 ?” 
PRINT TAB(15) “学 号 ?5 工 AB(21)3 “平均 ? 
FOR I=1 TO M 


3960 
3970 
3988 
3990 
4000 
4010 
4020 
4030 
4040 
4050 
4060 
4070 
4080 
4090 
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PRINT TAB(5YI+21)5 开 吊 () 
NEXT 1 

FOR 及 =1 TO N 

FOR I=7 TO N 

IF 必 <<>PGD) THEN 4070 

PRINT TAB(3)， KK TAB(8)， A 和 $(D) 
PRINT TAB(15)5 S(D)， TAB(21); 天 P(CD 
FOR J=1 TO M 

PRINT TAB(G5#J 二 21)5 A(I，J)) 
NEXT 可 

PRINTT 

NEXT 1 

NE 入 T 开 

RETURN 


第 五 章 “ 中 华 学 习 机 使 用 指南 


一 、 帮 你 组 成 一 套 实 用 的 中 华 学 习 机 系统 
64. 系 统 的 配置 


中 华 学 习 机 系统 部 件 很 多 ， 如 主机 、 磁 带 机 、 显 示 器 
打印 机 、 软 盘 驱 动 器 ， 但 这 些 部 件 并 非 缺 一 不 可 ， 利 用 它 的 
最 大 优点 一 一 积木 式 结构 ， 我 们 可 以 根据 自己 的 条 件 和 使 用 
的 目的 等 来 选择 系统 的 配置 。 

目前 ,大 多 数 家 庭 都 有 了 电视 机 和 录音 机 ,再 配 上 -和 台 主 
机 便 构 成 了 中 华 学 习 机 的 最 小 系统 ， 利 用 最 小 系统 可 以 编制 
程序 、 计 算 题目 和 作 游 戏 等 。 

当然 ， 如 果 想 使 用 更 多 的 成 品 软件 来 艇 决 学 习 中 的 问 
题 ， 用 于 辅助 教学 、 开 发 学 校 管理 系统 等 ， 那 么 最 好 是 配置 
软盘 驱动 器 。 软 磁盘 容量 大 、 读 写 速度 快 ,而 且 方 便 。 因 此 ， 
目前 许多 软件 都 是 存 贮 在 软磁盘 上 ， 这 样 ， 只 有 配置 软盘 驱 
动 器 才能 使 中 华 学 习 机 在 更 广泛 的 领域 里 发 挥 出 更 大 的 作 
用 。 

当然 打印 机 也 是 很 有 用 处 的 ， 在 有 条 件 的 情况 下 配置 它 
并 不 多 余 ， 它 能 将 程序 运行 的 结果 、 屏 幕 的 郴 而 稻 图 形 打印 
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在 纸 上 ， 还 可 以 输出 报表 ， 打 印 文 稿 等 。 

总 之 ， 在 选择 系统 配置 时 ， 一 要 根据 现 有 条 件 ， 二 要 根 
据 使 用 月 的 ， 全 面 考 虑 。 当 然 ， 也 可 以 先 配 置 最 小 系统 ， 在 
有 条 件 时 或 者 需要 时 再 逐步 完善 。 


65， 系统 的 连接 


当 确 定 了 中 华 学 习 机 的 系统 配置 之 后 ， 便 可 以 着 手 将 它 
们 连接 在 一 起 了 。 

(1) 主机 与 显示 器 的 连接 

当 使 用 电视 机 作为 显示 器 时 ， 连 接 方法 如 下 ， 

全 把 电视 机 的 天 线 捅 头 拔 掉 ， 

他 用 视频 电缆 线 一 头 插入 主机 后 座 标 有 “电视 机 ?”(TYV) 
的 搬 孔 ， 一 头 插入 电视 机 天 线 捅 孔 ; 

人 昌 将 电视 机 电源 和 主机 电源 插头 分 别 插入 电源 插座 ; 

人 弗 先 开 电 视 机 电源 开关 ， 再 开 主 机 电源 开关 

峡 调 准 电 视 机 频道 ( 一般 在 3 或 4 频道 ) 直到 屏幕 清晰 
为 准 。 

当 使 用 监视 器 作为 显示 器 时 ， 连 接 方 法 如 下 ， 

全 用 视频 电缆 线 一 头 捅 入 主机 后 座 标 有 “监视 器 ”的 接 
口 ，- : 头 播 入 监视 器 IN 插座 ; 

@@ 将 主机 及 监视 器 的 电源 播 头 分 别 揪 入 电源 插座 3 

他 先 开 监视 器 后 开 主 机 ,屏幕 上 将 出 现 清 晰 的 “ZHONG 
HUA XUE-XI JI” 字样。 

《2) 主机 与 录音 机 的 连接 
, 218， 


将 录音 机 电线 线 的 一 端 插 入 主机 俩 面 的 录音 灿 接 口 ， 另 
~ 端 的 两 个 3 .5mm 择 头 分 别 搬入 录音 机 耻 AR 揪 孔 〈 连接 主 
机 IN) 和 MIC 插 孔 (连接 主机 OUT)。 

〈3)》 主机 与 软盘 驱动 器 的 连接 

将 主 电路 板 软磁盘 驱动 器 的 一 组 捅 座 插 上 相应 的 器件 ， 
苑 软盘 驱动 器 带 有 一 个 20 芯 电缆 将 此 电缆 与 主机 座 后 面 标 有 
软盘 驱动 器 的 20 芯 插座 相连 。 

(4) 主机 和 打印 机 的 演 接 

先 将 打印 机 扩充 板 插入 主机 内 相应 的 插座 上 ， 然 后 通过 
20 芯 电缆 将 扩充 板 上 的 揪 座 与 打印 机 捕 孔 相连 。 

至 此 ， 中 华 学 习 机 系统 已 经 安装 完毕 ， 等 待 开 机 使 用 。 


66 .系统 的 启动 


首先 将 主机 和 其 它 外 部 设备 〈 电视 机 、 录 音 机 、 打 印 机 
等 ) 的 电源 接 到 220V 电源 反 座 上 ， 当 然 如 果 有 稳 压 电源 更 
好 ， 将 稳 压 电源 的 输出 调 为 220V ， 然 后 将 主机 和 其 它 外 部 
设备 电源 线 接 在 稳 压 电源 的 输出 端 。 
现在 我 们 就 可 以 开机 了 。 这 里 ， 要 分 两 种 情况 来 介绍 。 
中 没有 软 稚 驱动 器 的 情况 下 ， 先 将 外 部 设备 的 电源 开关 
开启 ， 然 后 在 计算 机 主机 的 左 后 方 找到 主机 电源 开关 ， 打 开 
此 开关 ， 可 听 到 扬声器 发 出 “ 哪 ” 的 一 声响 ， 屏 幕 显示 中 华 
学 习 机 的 汉语 拼音 “ZHONG HUA XUE XI JI ”字样 ， 
左下 方 显示 “]” 符号 ， 我 们 称 它 为 提示 符 ， 它 告诉 我 们 计 
算 机 处 于 何 种 工作 状 态 〈 有 目前 已 自动 进入 BASIC 状态 )， 
“。 219“。 


攻 莫 上 办 动 着 的 “[ ”符号 需 二 多 下 一 个 字符 的 显示 位 置 ， 
莪 们 称 它 为 光标 。 它 的 存在 说 明 计 算 机 目前 可 以 搂 受 键 拖 信 

包 系 统 瑟 有 软盘 驱动 器 时 ， 应 首先 将 标 有 DOS3.3 的 东 
插入 磁盘 驱动 器 〈 注意 在 插入 磁盘 时 要 将 有 标签 的 一 面 蓝 
上 ， 和 口 朝 里 ) 关上 驱 劲 器 的 门 柄 ， 然 后 打开 外 部 设备 开 
关 ， 找 到 主机 开关 并 打开 ,这 时 可 听 到 扬声器 发 出 “ 嘟 ?的 一 
声响 ， 屏 医 显 示 “ZHONG HUA XUE XI JI” 字 样 ， 
说 明 计算 机 已 经 被 启动 ， 处 于 正常 工作 状态 ， 如 果 没有 听 到 
声响 ， 应 立刻 关闭 电源 进行 检查 ， 排 除 故 障 后 再 重新 开机 。 

这 时 磁盘 机 上 的 指示 灯 发 亮 ， 并 且 可 以 听 到 马达 转动 的 
声音 ， 直 到 磁盘 机 灯 熄 灭 ， 屏 幕 将 显示 : 

DOS VERSION 3.3 08/25/180 

APPLE 1 PLUS OR ROMCARD SYSTEM 

MASTER 

(LOADING INTEGER INTO LANGUAGE 

CARD) 

][] 

此 时 ， 系 统 已 在 BASIC 系统 下 ， 如 果 开 宙 前 没有 将 
DOS3 ,3 软磁盘 装 入 ， 系 统 就 会 直接 进入 APPLE BASIC 
系统 ， 如 果 需 要 装 入 DOS 系 统 ， 此 时 可 以 将 DOS 盘 插 入 厂 
基 忆 ， 并 键入 ; 

] PR36 -/ 

于 是 屏幕 显示 同上 。 
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二 键盘 操作 


67. 呈 从 学 习 现 的 仙 盘 


中 华 学习 机 的 键盘 和 主机 是 一 体 的 〈 直 接 装 在 主机 过 
内 ) ， 它 们 之 间 是 通过 一 条 26 线 忆 平 电缆 相连 接 的 ， 外 形 如 
图 5-1。 

从 几 5-: 线 们 可 以 看 旦 键盘 共有 69 键 ， 其 中 包括 26 个 英 
文 宇 母 刍 、10 个 数字 键 积 符号 键 ， 这 些 者 属于 一 般 常 用 键 。 
浓 此 之 外 ， 述 和 一 些 特 丈 键 。 

(1) TEL ETEs LE FEs| 键 

这 五 个 键 称 为 功能 键 ， 用 户 可 以 根据 自己 的 需要 定义 它 
扫 的 功能 。 例 如 ， 在 后 一 部 分 讲 到 BASIC 程序 ， 当 我 们 向 
六 存 输 了 一 些 程序 之 后 想 将 全 部 程序 列 出 来 看 一 看 ， 就 要 用 
到 这 样 一 个 命令 ，LIST 。 这 样 一 个 个 字母 键入 十 分 麻 归 ， 
我 们 就 可 以 定义 已 为 LIST ,只 要 按 下 已 键 , 习 幕 上 立即 出 现 
LIST， 并 将 内 存 中 的 程序 列 于 屏幕 上 ， 读 操作 既 快 又 简便 。 
当然 在 不 同 的 系统 中 它 有 不 同 的 用 途 ， 以 下 用 到 时 再 作 介 


绍 。 

(2) | CtrLj 键 

称 为 拧 制 键 ， 当 它 与 其 它 的 键 间 时 按 下 ， 可 产生 不 同 的 
控制 作用 。 


(3) | Reset | Reset | 键 
a。 221。 
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用 于 系统 复位 。 当 通电 后 ， 系 统 运 行 中 ， 由 于 操作 失误 
或 程序 错误 等 原因 ， 使 系统 不 能 正常 执行 (或 者 陷入 死 循 
环 ) ， 希 要 系统 重新 启动 ， 在 按 下 | Ctrl | 键 的 同时 ， 按 下 
LEReset | 键 ， 系 统 便 重新 启动 。 

(4) | Return | 刍 

这 个 键 叫 回 车 键 ， 是 键盘 上 最 重要 的 键 ， 也 是 用 得 最 多 
才 真正 地 接受 并 执行 。 本 书 将 此 键 用 “- ”来 代替 。 

(5) | Shiftl 键 

叫做 变换 键 。 键 盘 上 ， 有 的 键 标 有 两 个 字符 ， 如 标 有 数 
字 “8 ”这 个 键 ， 在 其 上 方 还 标 有 符号 “* ”。 如 果 我 们 要 
将 “8 ”这 个 数 输入 计算 机 内 ,直接 按 该 键 即 可 ;如 果 要 输入 


有 了 两 个 字符 的 键 ， 要 想 输 入 上 面 的 字符 ， 就 必须 在 按 该 刍 
的 同时 ， 按 下 [Saift] 键 ， 所 以 此 键 又 称 为 “上 档 键 ”。 

(6) LLock Caps | 键 

是 字母 大 小 写 的 转换 键 。 按 下 该 键 ， 键 盘 处 于 大 写字 母 
状态 ， 此 时 字母 键 输入 的 信号 ， 在 计算 机 内 或 屏幕 上 均 显 示 
大 写字 母 ， 再 按 一 下 该 键 ， 键 盘 则 回 到 小 写字 母 状 态 ， 这 时 
凡 输 入 的 字母 , 均 为 小 写字 母 且 屏幕 上 显示 的 也 是 小 写字 母 。 

(7) | 中文 1 和 1 西 文 | 刍 

用 于 中 西 文 方式 的 转换 ， 通 电 后 系统 自动 处 于 西 文 
BASIC 状态 ， 若 此 时 键入 | 中文] 刍 ， 系 统 便 进 入 中 文 
BASIC， 若 想 再 次 进入 西 文 BASIC 可 接 [ 西 文 | 键 。 
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(8)| 二 刍 
为 室 格 键 , 在 中 文 键 和 西 文 键 之 间 ,程序 中 要 多 次 用 到 此 


(9) | Test | 键 

用 于 系统 自 检 ， 这 部 分 内 容 在 以 后 章节 里 叙述 。 
(10) | ESC | 键 

用 于 屏幕 编辑 ， 我 们 下 节 讲 到 。 


68 .键盘 操作 的 要 领 


(1) 键盘 操作 的 姿势 

操作 键盘 要 有 正确 的 姿势 ， 对 于 儿童 来 说 就 如 同 掌 握 号 
字 要 领 一 样 重要 ， 数 十 年 后 ， 键 盘 操作 将 与 写字 具有 同等 的 
地 位 。 

正确 的 姿势 应 该 是 ， 头 要 正 ， 背 要 直 ， 两 腿 自 然 弯 曲 成 
90 度 ， 两 脚 平 放 地 面 与 肩 同 宽 ， 两 大 臂 自然 牌 下 ， 两 小 车 自 
然 弯曲 与 大 臂 成 90 度 ， 两 腕 与 手臂 成 平行 ， 两 手 如 弓 型 ， 自 
然 地 放 在 键盘 上 ， 身 体 与 键盘 的 位 置 可 根据 小 臂 的 长 短 自 由 
调整 ， 一 般 在 15 一 20 厘 米 左 右 ， 只 要 大 辟 自 然 下 垂 而 手指 舒 
服 地 放 在 中 排 键 上 ， 这 就 说 明 身体 离 键 位 的 距离 合适 了 。 

总 之 ， 在 进行 键盘 操作 之 前 要 对 姿 势 和 上 离 进行 自我 检 
查 ， 认 为 正确 并 感到 舒适 就 可 以 进行 键盘 操作 了 。 

(2) 击 键 的 力度 

首先 手 腕 要 保持 平行 ， 用 大 辟 带动 小 辟 做 直上 上 直下 的 活 
动 ， 手 指 保持 自然 弯 则 。 了 手腕 要 绝对 保持 与 小 幢 自 然 平 行 。 
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手指 岩 键 变 讯 速 果断 ， 每 击 一 键 手 指 要 迅速 弹 加 基本 键 位 
上 ， 这 样 可 以 提高 速度 ， 而 且 省 力 ， 前 键 击 后 可 利用 弹 起 的 
力 再 击 下 一 建 。 


69 . 屏 某 编辑 


屏幕 编辑 就 是 当 我 们 通过 键盘 向 计算 机 输入 命令 或 者 程 
序 的 同时 ， 也 显示 在 屏幕 上 ， 如 果 发 现 错误 和 格式 不 对 时 ， 
就 要 进行 修改 ， 这 个 过 程 就 称 为 屏幕 编辑 。 

屏幕 编辑 要 用 到 编辑 键 ， 以 下 介绍 编辑 键 的 用 法 。 

首先 讲 一 下 最 常用 的 两 个 编辑 键 。 

@ | 急 |， 按 下 此 键 ， 删 除 内 存 输入 行 的 最 末 一 个 宣 
符 ， 并 使 光标 在 屏幕 上 左 移 一 格 。 使 用 它 就 像 我 们 通常 擦 字 
用 的 橡皮 一 样 方便 ， 输 入 过 程 中 发 现 有 错误 就 可 用 它 来 将 其 
抹 去 ， 进 行 修改 。 

@ | 己 j， 按 下 此 键 ， 可 把 光标 处 的 字符 输入 到 内 存 输 
入 行 的 末尾 ， 并 使 光标 右 移 一 格 ， 这 个 键 的 使 用 一 般 要 与 其 
它 编 辑 键 配 合 使 用 。 

下 面 介绍 一 套 只 改变 屏幕 上 显示 的 字符 ， 而 不 能 改变 内 
存 输入 行 字符 的 编辑 命令 。 

这 套 编 辑 命令 是 以 了 SC 键 打头 的 一 套 编辑 命令 。 使 用 
方法 如 下 , 按 下 [ESC | 键 后 就 进入 编辑 状态 在 该 状态 下 ， 
有 11 个 键 (A，B，C，D;， E，F，@，TLI， JJ 下 ，M) -一 
称 为 “ESCAPE 码 ”， 定 义 如 下 ， 

ESC A， 光 标 右 移 一 行 
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也 SC 
也 SC 


由 此 可 以 看 到 ESC 与 A，B，C，D， 节 ， 
执行 后 自动 退出 卫 SCAPE 方式 ， 而 与 1，J， 开 ，M 配 合 执 
行 后 仍 处 于 卫 3SCAPE 方式 ， 直 到 打 入 一 个 非 上 SCAPE 码 


B， 光标 左 移 一 行 ， 

C:， 光标 下 移 一 行 ; 

D， 光标 上 移 一 行 ; 

卫 ， 从 光标 处 开始 清除 到 行 尾 ， 

FE， 从 光标 处 开始 清除 到 屏幕 尾 ; 

Q@: 清 屏幕 ， 且 光标 回 到 屏幕 的 左上 角 ， 
I， 光 标 上 移 一行 ， 仍 处 于 ESC 方式 ; 
和 人 A， 同上 ; 

J， 光标 左 移 一 格 ， 仍 处 于 下 SC 方式 
< ， 同 上 ! 

K， 光 标 右 移 一 格 ， 仍 处 于 节 SC 方 式 ; 
记 ， 同 上 ! 

M， 光 标 下 移 一 行 ， 仍 处 于 了 SC 方式 ; 
V: 同上 。 


之 后 才 退 出 下 SCAPE 方式 。 


中 华 学 习 机 与 其 它 学 习 机 相 比 ， 突 出 的 优点 是 增加 了 汉 


三 、 汉 字 系 统 的 使 用 


字 功能 ， 这 为 我 们 的 使 用 带 来 了 很 大 的 方便 。 


目前 微型 计算 机 上 配 有 的 汉字 系统 有 许多 种 ， 实 现 方法 
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下， 人 @ 配 合 ， 


天 输入 方法 也 各 不 相同 。 中 华 学 习 机 集中 了 它们 的 优点 ,在 实 
而 方法 上 采用 了 固化 ROM， 就 是 把 汉字 的 编码 都 做 在 几 片 
非常 小 的 集成 电路 块 上 ， 这 样 可 不 占用 内 存 贮 器 空间 ， 也 就 
可 以 节省 出 许多 内 存 贮 器 空间 供 我 们 利用 。 同 时 ， 这 种 实现 
方法 查找 汉字 速度 也 非常 快 。 

在 输入 方法 上 也 作 了 一 些 改进 ， 主 要 是 针对 学 习 机 的 使 
用 对 象 是 广大 青少年 和 非 计算 机 专业 人 员 ， 因 此 要 求 输入 方 
法 简单 、 易 学 ， 采 用 了 拼音 输入 法 和 区 位 码 输 入 法 。 

拼音 输入 法 是 采用 全 拼音 输入 ， 即 要 输入 某 一 个 汉字 ， 
只 要 将 此 汉字 的 汉语 拼音 输 进 去 ， 就 可 以 将 此 汉字 查找 出 
来 ， 对 学 过 汉语 拼音 的 人 ， 特 别 是 广大 青少年 就 相当 方便 。 

区 位 码 输入 法 是 采用 国际 GB2381-80 区 位 方式 输入 汉 
字 。 要 输入 某 一 个 汉字 就 要 将 它 所 对 应 的 区 位 码 输 进去 ,很 显 
然 这 需要 记忆 大 量 的 数码 。 那 么 为 什么 要 采用 这 种 输入 方法 
呢 ? 这 是 因为 区 位 码 输入 法 查找 速度 快 。 我 们 适当 记 一 些 党 
用 符号 和 汉字 的 区 位 码 ， 可 大 大 加 快 我 们 的 输入 速度 。 


70 .汉字 系统 的 启动 与 退出 


(1) 汉字 系统 的 进入 
当 加 电 后 系统 自动 处 于 西 文 BASIC 状态 ,屏幕 显示 为 低 
分 辨 率 字符 方式 ， 即 整个 屏幕 可 显示 24 行 ， 每 行 40 个 字符 。 
此 时 键入 “中 文 ” 键 ， 则 进入 中 文 BASIC ， 屏 幕 显示 方式 
为 高 分 辨 有 图 形 方式 ， 全 屏幕 可 显示 每 行 17 个 汉字 ， 共 10 
行 ， 此 时 下 部 第 11 行 为 状态 行 ， 状 态 行 左 端 显 示 “ 西 文 ” 
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两 字 ， 这 是 状态 提示 符 ,， 它 天 示 系 绕 处 于 中 文 BASIC 
下 的 西 文字 符 输 入 状态 。 

(2) 汉字 系统 的 退出 ; 

在 中 文 状态 下 ， 直 按键 入 “ 西 文 ? 键 ， 便 可 退出 中 文 状 
态 ， 进 入 西 文 BASIC 状态 。 


71. 汉 字 的 输入 方法 
进入 汉字 系统 后 ， 系 绕 处 于 字母 输入 方式 ， 这 时 通过 键 


盘 输 入 的 是 ASCII 字符 ， 通 过 按 下 “Fl1” 一 “F5” 功 能 链 
可 以 选择 不 同 的 汉字 输入 方式 。 功 能 键 的 定义 如 下 ， 
“FI1”(CTRE 一 A) 一 一 字 母 方式 
“了 22 (CTREL 一 L) -一 拼音 给 入 方式 ; 
“F3” (CTREL 一 允 ) 一 一 区 位 码 输 入 方式 ; 
下 42 (CTRL 一 人 ) 一 一 保留 给 用 户 扩充 新 的 输入 方 
案 ; 
“下 5?(CTRT 一 F) 一 一 保留 给 用 户 扩充 新 的 输入 方案 。 
(1) 拼音 输入 法 
在 进入 汉字 系统 后 , 按 下 “F2?” 键 (或 CTRL 一 L ) 后 ， 
屏 医 提 示 行 将 显示 “拼音 两 字 ”， 表 示 进 入 拼音 输入 方式 。 
拼音 输入 方式 使 用 26 个 字母 键 ， 大 小 写字 母 均 可 输入 。 
中 华 学 习 机 采用 全 拼音 输入 ， 即 输入 汉字 时 ， 将 该 汉 裤 
的 音节 (声母 和 前 母 ) 全 部 打 入 ， 计 算 机 根据 输入 的 音节 在 状 
态 行 提示 出 该 音节 的 所 有 字 ， 包 括 不 同 声调 的 字 ， 操 作者 根 
提 提 示 选 择 所 需要 的 字 。 因 此 ,只 要 学 会 全 拼音 输入 方式 ,就 
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不 用 再 记忆 输入 码 了 ， 这 很 有 利于 并 童 掌握 计算 可 。 

其 输入 过 程 可 以 分 以 下 几 步 ; 

A ,键入 声母 。 此 时 ， 屏 幕 状 态 行 上 显示 出 以 该 声母 开 
头 的 音 基 计生 常 用 的 6 个 汉字 ， 此 时 车 其 中 有 要 输入 的 汉 
字 ， 只 贾 打 入 相应 的 序号 ( 每 个 汉字 之 前 都 有 序号 ) 即 可 。 

B .键入 葛 母 。 

C :向 前 或 者 向 后 寻找 同音 字 。 当 键入 韵母 之 后 ， 屏 莫 
状 凑 行 提示 出 6 个 同音 节 字 ， 若 这 六 个 同音 字 中 没有 要 输入 
的 汉字 ， 可 键入 园 键 ， 这 时 在 屏幕 状态 行 又 会 显示 出 下 一 
智 大 个 同音 节 字 ， 若 还 没有 继续 按 加 键 ， 直 到 计算 仙 发 出 
“ 哪 ” 声 ， 表 示 已 全 部 显示 完 ， 当 你 要 寻找 前 一 幕 汉字 
时 ， 可 澳 园 键 ， 此 时 前 一 幕 的 六 个 汉字 显示 在 状态 行 上 。 

D .键入 所 选择 的 序号 。 当 状态 行 上 出 现 要 输入 的 汉 字 
时 ， 只 要 打 入 该 汉字 前 面 的 序号 ， 该 汉字 莽 显 示 在 屏幕 光标 
位 置 上 ， 汉 字 内 码 输 入 到 键盘 输入 缓 神 区 ， 连 续 打 入 序号 ， 
可 连续 输入 汉字 。 

芝 .删除 拼 次 提示 。 藻 和 河 入 了 哇 ， 河 : 可 走 
接 接 | 要 键 ， 使 状态 行 上 最 后 一 个 拼音 字母 被 删除 ， 当 状态 
行 上 的 拼音 都 删除 掩 之后， 再 技 [可 键 ， 则 出 除 光 记 上 的 信 
息 。 

当 需 杰 退 出 拼 首 输入 方式 时 ， 可 在 按 下 CTRL 键 的 同时 
按 下 L 键 , 屏 菩 下 部 状态 行 显示 “ 西 文 ”两 字 , 此 时 即 退 出 拼 
音 输入 方式 。 

(2) 区 位 名 得 入 法 
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在 汉字 系统 状态 下 ， 按 “FE3” 键 《或 CTRL 一 W) 后 ， 
评 幕 状态 提示 行将 出 现 “ 区 伍 ， ”两 字 ， 表 示 进 入 区 位 码 输 
入 方式 。 

区 位 码 得 和 八方 式 是 使 用 国家 标准 GB 一 2381 一 80 区 位 方 
式 输入 汉字 。 主 答 入 汉字 时 ， 仅 使 用 0 一 9 共 10 个 数字 键 作为 
汉字 的 输入 键 ， 通 过 矿 入 四 位 数字 键 可 以 把 国家 标准 中 所 规 
定 的 汉字 和 图 形 字符 输入 到 计算 机 中 ， 如 国标 中 规定 16 区 01 
位 置 上 的 汉字 是 “ 啊 ”， 键 入 1601 后 ，“ 啊 ” 字 就 输入 到 计 
算 机 中 了 ， 即 ， 

区 位 码 汉字 

昌 

区 色 位 码 

在 使 用 区 位 码 输 入 汉字 时 ， 除 0 一 9 数字 键 作 为 汉字 键入 
码 之 外 ， 键 盘 上 的 其 它 键 均 以 原来 的 ASCII 字 符 来 处 理 。 

在 输入 汉字 过 程 中 ， 如 果 有 一 输入 码 裔 错 , 可 用 |< 键 
来 删除 。 如 果 所 键入 的 区 位 码 不 在 国标 码 所 规定 的 范围 之 
内 ， 系 统 会 发 出 蜂 鸣 声 警告 用 户 . 拒绝 接收 所 输入 的 区 位 
码 ， 等 待 用 户 重 新 键入 或 删除 修改 。 

以 上 介绍 的 是 两 种 汉字 输入 方式 ， 中 华 学 习 机 还 有 其 它 
输 ， 方 式 ， 这 里 就 不 再 一 一 介绍 了 。 


四 、 如 何 利用 磁带 存 取信 息 


当 把 中 华 学 习 祝 作为 家 庭 电脑 来 使 用 时 ， 一 般 都 是 将 录 
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彰 机 《 磁带 机 ) 作为 外 存 贮 器 ， 它 不 但 经 济 实惠 ， 而 且 使 用 
方便 。 为 此 ， 中 华 学 习 机 增强 了 这 方面 的 功能 ， 以 便 使 中 华 
学 习 机 更 快 地 进入 千家 万 户 。 


72 .将 BASIC 程 序 存 入 磁带 


当 我 们 在 主机 上 调试 好 一 个 BASIC 程序 ， 可 以 记录 在 
录音 机 的 磁带 上 ， 等 需要 时 可 随时 调 出 运行 。 将 主机 内 存 中 
的 BASIC 程 序 存 入 磁带 的 命令 如 下 ， 

格式 : SAVE [文件 名 7] 

其 中 : 文件 名 用 方 括号 括 起 来 ， 表 示 可 以 选择 。 

使 用 方法 是 在 键盘 上 沿 入 SAVE 和 文件 名 之 后 ， 同 时 按 
下 磁带 机 的 放 音 键 PLAY 和 录音 键 REC， 儿 秒 钟 之 后 按 下 
键盘 上 的 回 车 键 。 在 程序 装 入 磁带 的 过 程 中 ， 计 算 机 会 发 出 
两 个 “ 哪 ” 声 ， 在 装 入 完毕 后 ， 屏 慕 上 会 显示 BASIC 提示 
符 “]" ,这 时 按 下 录音 机 的 STOP 键 。 若 不 台 入 文件 名 ， 也 
可 以 将 程序 存 入 磁带 ， 但 假若 再 次 将 程序 从 磁带 上 装 入 内 存 
时 ， 就 只 能 任 文 件 在 磁带 上 的 位 置 来 装 入 文件 了 。 


73 .将 磁带 上 的 BASIC 程序 装 入 内 存 


将 磁带 上 的 BASIC 程 序 装 入 内 存 的 命令 如 下 ， 
烙 式 ， LOAD [文件 名 ?3]; 
其 中 ， 文 件 名 可 以 不 给 出 。 
使 用 方法 是 在 主机 键盘 上 避 入 LOAD 和 文件 名 后 ， 按 
下 录音 机 的 放 音 键 PLAY， 儿 秒 钟 后 ， 按 下 键盘 的 回 车 键 ， 
= 231。 


程序 开始 装 入 内 存 ， 在 些 过程 由， 机 器 会 发 出 “ 嘟 ”的 - 
汤 。 当 装 入 完毕 后 ， 屏 幕 上 显示 出 文件 名 及 BASIC 提示 符 ， 
如 果 装 入 的 文件 并 非 是 你 所 要 装 入 的 文件 时 ， 屏 幕 上 会 提示 
已 装 入 的 文件 名 和 如 下 信息 :“HAS BEEN LOADED?， 
并 继续 装 入 后 面 的 文件 ， 直 到 装 入 LOAD 语 名 所 指定 的 文件 
为 止 ， 如 果 没 有 给 出 文件 名 ，LOAD 命 令 只 将 第 一 个 文件 调 
入 内 存 ， 然 后 显示 BASIC 提 示 符 。 


74 .将 磁带 中 游戏 软件 装 入 内 存 并 自动 运行 


当 把 中 华 学 习 机 作为 家 庭 电 脑 时 ， 玩 游戏 便 成 为 主要 用 
途 之 一 ， 因 中 华 学 习 机 与 荤 果 机 兼容 ， 所 以 磁带 游戏 软件 相 
当 丰 富 。 为 此 ， 专 门 增加 了 将 录音 机 中 游戏 软件 装 入 内 存 并 
自动 运行 的 命令 ， 

格式 ，PLAY。 

使 用 方法 是 先 将 磁带 退 到 开始 位 置 ， 在 键盘 上 打 人 入 
PLAY 命令 ， 但 注意 在 键入 该 命令 后 先 别 按 回 车 键 ， 在 录音 
机 上 按 下 放 音 PELAY 键 ， 使 做 带 开始 转动 ， 再 按 下 键盘 上 回 
车 键 (RETURN)， 这 时 屏幕 上 光标 消失 ， 大 约 15 秒 钟 ， 
会 出 现 “PLEASE WAITING…” 之 类 的 信息 ， 当 游戏 程 
序 装 入 内 存 后 会 自动 运行 ， 这 时 ， 按 下 录音 机 的 STOP 键 ， 
停止 磁带 转动 。 
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五 、 打 印 机 的 使 用 


如 果 你 面前 的 中 华 学 习 机 系统 配 有 打印 机 ， 那 么 掌握 正 
确 使 用 打印 机 的 方法 也 相当 重要 。 


75 , 娄 何 打印 西 文 


按 前 面 介绍 的 方法 将 主机 与 打印 机 接 好 线 ， 打 升 打印 机 
电源 开关 ,并 按 下 打印 机 “ON LINE ” 键 ， 看 到 打印 机 上 
的 指示 灯 “READY” 和 “QON LINE? 亮 后 ,打开 主机 电源 
开关 ， 引 导 DOS (步骤 如 前 面 所 介绍 的 ) ,进入 西 文 状 态 ， 
雏 入 ; 

PR#1L 。/ 

PRINT “ZHONG HUA XUE XI JI” 

执行 后 在 打印 纸 上 便 打出 ” “ZHONG HUA XUE XI 
JI” 字 样 ， 在 屏幕 上 同时 也 显示 出 “ZHONG HUA XUE 
攻 T 


76 .和 如何 打印 中 文 


在 汉字 管理 程序 中 ， 打 印 机 驱动 程序 的 设计 仅 适 用 于 九 

针 图 形 打 印 视 ， 其 型 号 要 求 必 须 与 下 PSON MX-80 下 型 打 

印 机 祖 兼 容 ， 如 FX-80 下 RX-80 夏 、CP-80 下 、FX-100+ 

和 YAMATO 等 型 号 的 打印 机 ， 其 接口 卡 必 须 定义 为 I/O 模 
日 的 1 号 模 。 
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首先 进入 汉字 系 统 ， 然 后 使 用 以 下 BASIC 命令 来 控制 
和 打 音 汉字 。 

(1) 设置 打印 方式 

格式 ，POKE 1659，n。 

其 中 ，a=0 表 示 不 打印 ,进入 汉字 系统 后 ,打印 方式 自动 
置 为 05a= 一 1 一 15 置 打印 ,并 按 系 统 定义 的 15 种 字 型 进行 打印 。 

(2) 设置 字 间 距 

格式 ，POKE 1787，n。 

其 中 ，a 为 所 打印 的 ASCII 字 符 之 间 的 字 间 距 ， 一 个 汉 
字 占 两 个 ASCII 字 符 的 位 置 ，na 取 值 范围 为 0 一 255， 即 字 间 
距 可 在 0 一 255 个 点 之 间 。 进 入 系统 后 ， 字 间距 自动 置 为 1 。 

(3) 设置 行距 

格式 ，POKE 1915，an。 

其 中 ，a 为 打印 行 之 间 的 点 间距 ， na 取 值 范围 在 0 全 255 
之 间 ， 即 行 间距 在 0 一 255 个 点 之 间 。 进 入 系统 后 ， 字 间距 自 
动 置 为 1 。 

(4) 设置 行 允 许字 数 

格式 POKE 2043，n。 

其 中 ，a 为 一 行 允 许 打 印 的 汉字 字数 ， 一 个 汉字 占用 两 
个 字符 的 位 置 ， 持 的 取 值 范围 是 0 一 255 之 间 。 进 入 系统 后 ， 
行 允 许字 数 自动 置 为 40。 

举例 如 下 ， 

上 用 15 种 字 型 打印 “中 华 学 习 机 ? 

程序 如 下 ， 
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10 HOME 

20 FOR I=1 TO 15 

30 POKE 1659，[ 

40 PRINT“ 中 华 学 习 机 ? 


50 NEXT 

60 END 

当 上 述 程序 键入 计算 机 之 后 ， 键 入 
RUN -./ 

打印 机 便 以 15 种 字 型 在 打印 纸 上 打 印 出 ， 
中 华 学 习 机 


六 、 磋 盘 和 DO 系统 


如 果 你 面前 的 中 华 学 习 机 系统 除了 主机 、 电 视 初 〈 显示 
器 ) 和 录音 机 之 外 ， 还 配 有 软盘 驱动 器 的 话 ， 有 必要 认真 地 
学 习 本 节 ， 掌 握 磁 盘 的 使 用 常识 和 基本 操作 及 其 命令 ， 从 而 
可 使 计算 机 系统 在 更 广泛 的 领域 时 得 到 应 用 。 若 你 的 系统 是 
基本 配置 ， 即 只 有 主机 、 电 视 机 ( 显示 器 ) 和 录音 机 磁带 
机 ) 的 话 ， 可 以 跳 过 本 节 ， 继 续 后 面 章节 的 学 习 。 

77 .磁盘 及 其 使 用 常识 

软磁盘 外 形象 一 个 小 晶片， 是 由 磁 放 材料 做 成 ， 上 面 可 


以 记录 大 量 信息 ， 中 华 学 习 机 采用 5 了 英寸 的 软磁盘 ， 可 以 
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记录 140K 字 节 的 信息 。 

我 们 将 磁盘 划分 成 35 个 同心 圆 ( 园 5-2 ) ， 这 些 肉 眼 油 
不 见 的 同心 圆 ， 取 
名 叫 磁道 ， 编 号 为 
0 伪 34; 每 个 太 道 
又 分 成 16 个 小 段 ， 
被 称 为 扇 区 ， 编 号 
为 0~15。 这 样 ， 
磁盘 上 的 信息 就 可 
供 人 们 存 了 到了。 图 5-2 

软磁盘 被 封装 在 保护 套 内 。 在 套 的 上 部 开 有 一 个 档 形 窗 
口 ， 称 为 读 写 窗口 ， 工 作 时 驱 注 器 的 磁头 ， 就 在 这 个 “ 窗 
口 ” 对 磁盘 进行 读 写 。 

磁盘 是 人 们 保存 程序 和 数据 的 工具 ， 一 定 要 棠 援 正 确 的 
使 用 方法 ， 久 免 损 永 、 于 失信 息 。 

使 用 时 应 注意 : 

申 严 禁用 手 去 抚摸 读 写 窗口 ， 严 禁 折 残 侣 

国 疝 驱动 器 里 揪 磁 商 时 要 正 画 朝 上 ( 贴 有 标签 的 曾 ) ， 
动作 要 轻 ， 然 后 合 上 了 驱 避 器 门 枉 ， 才 能 对 其 进行 读 写 操作 ， 

@@ 当 驱动 器 面板 上 的 红 灯 亮 时 ， 表 明 计算 机 正在 对 矿 盘 
进行 读 写 工作 。 此 时 ， 严 楚 取 出 磁盘 ， 待 红 灯 熄 后 ， 方 筷 取 
出 和 更 换 磁 盘 ， 和 否则 ， 容 易 划 伤 磁盘 ， 于 失信 息 ; 

全 平 讨 不 用 的 磁盘 应 装 入 保护 套 中 ， 并 放 在 磁盘 念 里 。 
计生 要 放 在 清 消 、 王 燥 面 没有 强 仿 马 的 地 方 。 


一 成道 35 


税 这 17 
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T8 ,DO 系统 


(1 什么 是 DOS 

DOD53 是 英文 Disk Operation System( 位 盘 操 作 系 统 
拘 缩 写 。 

操作 系统 是 一 个 计算 机 系统 管理 程序 ， 是 人 和 计算 饥 蓉 
包 之 间 交 换 信息 的 桥梁 。 

这 个 大 的 计算 机 管理 程序 一 一 操作 系统 设置 了 许多 命 
全， 控制 计算 机 的 各 个 部 件 〈 主 机、 显示 器 、 录 音 机 、 软 盘 
司 动 器 、 打 印 机 等 ) 。 人 们 通过 操作 系统 可 以 向 计算 机 发 布 
写 令 ， 从 而 使 用 起 来 更 加 方便 有 效 。 

目前 ， 大 多 数 微型 计算 机 将 操作 系统 存放 在 磁盘 里 ， 因 
旺 称 作 人 磁盘 操作 系统 。 

中 华 学 习 机 使 用 的 磁 检 操 作 系统 是 Appls soft DOS 
3.3， 这 是 1980 年 8 月 推出 的 ， 它 对 前 面前 几 个 版 杰作 了 了 记 
一 步 的 改进 。 

(2) 引导 DOS 

所 谓 引 导 DOS 就 是 将 DOS 从 磁盘 装 入 主机 员 奉 ， 让 计 
算 机 在 DOS 控 制 之 下 运行 。 

澡 作 过 程 如 下 ; 

四 首先 检查 主机 利 磁 盘 驱 动 吕 的 连接 是 否 正 确 。 

加 将 DOS 3.3 版 本 的 磁盘 插入 驱动 史 帅 ， 佑 上 噶 动 则 


图 打开 申 视 机 电源 ， 打 开 主 机 电源 。 这 时 会 让 到 滋 瘟 台 
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劲 器 电机 转动 的 声音 ， 经 过 5 秒 钟 ， 磁 盘 机 灯 熄 灭 ， 屏 阁 将 
出 现 DOS 3.3 版 本 号 等 信息 说 明 DOS 已 装 入 机 器 ， 此 过 程 
称 为 冷 启动 。 

在 系统 已 经 加 电 ， 或 者 系统 处 于 BASIC 状态 下 ， 如 果 
需要 装 入 DOS 系统 ， 此 时 可 将 DOS 盘 插 入 磁盘 机 ， 并 键 
入 : 


]PR #6 
这 种 在 主机 已 加 电 情 况 下 ， 引 导 操 作 系统 的 方法 让 称 为 
专 启 动 。 


(3) DOS 常 用 的 命令 及 使 用 

中 制作 一 张 工作 盘 ， 在 中 华 学 习 机 随机 提供 的 软盘 中 ， 
有 一 张 是 DOS 3.3 的 系统 主 盘 ， 扫 上 除了 DOS 3.3 系统 
程序 外 ,还 有 BASIC 解释 程序 等 ,因而 占 去 了 磁 的 大 部 分 
室 间 。 假 如 我 们 自己 要 编制 一 些 程序 想 存 贮 在 磁 稚 上 ， 那 么 
所 留 的 空间 就 显得 太 少 了 ， 另 外 用 户 程 序 和 系统 软件 一 起 存 
放 ， 稍 不 留神 ， 在 删除 、 存 取 等 操作 中 ， 有 可 能 会 破坏 系统 
文件 ， 因 此 ， 建 议 有 必要 做 一 些 工 作 盘 ，DQOS 为 此 提供 一 
个 专用 命令 ， 

INIT 

功能 ， 格 式 化 空白 盘 。 

新 买 来 的 空 所 软 盘 片 ， 上 面 没有 记录 任何 信息 ， 为 了 准 
确 迅 速 地 在 磁盘 上 写 入 数据 或 读 出 数据 ， 必 须 做 一 些 标 记 。 

用 INIT 命令 可 以 将 磁 扫 按 磁 道 和 扇 区 划分 地 址 ， 以 便 
起 写 做 盘 文 件 时 ， 能 尽快 地 找到 所 需要 的 信息 ， 除 此 之 外 ， 
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在 磁盘 上 还 可 建立 部 分 磁盘 管理 信息 ， 我 们 将 这 些 处 理 过 程 
虽 做 对 磁 失格 式 化 ， 空 白 盘 必须 经 过 格式 化 才能 使 用 。 

A . 写 入 DOS 系 统 程序 ， 工 作 盘 上 写 入 DC3 系 统 ， 每 次 
开机 ， 便 可 自动 将 其 引导 ， 进 入 机 器 系统 ， 使 用 非常 方便 。 
1NIT 命 令 便 可 将 DOS 系 统 写 入 要 制作 的 工作 盘 的 0 一 2 三 个 
磁道 上 。 

B . 写 入 第 一 个 BASIC 程 序 ， 把 内 存 的 -一 段 BASIC 程 序 
作为 磁盘 的 第 一 个 文件 写 入 工作 盘 ， 以 后 每 次 引导 DOS 之 
后 ， 便 可 自动 执行 该 BASIC 程 序 。 

C .制作 工作 盘 的 操作 步 又 

@ 将 DOS 3.3 系统 盘 择 入 驱动 器 中 ， 做 冷 启动 或 热 启 
动 。 

加 启动 成 功 后 取出 DOS 盘 ， 捅 入 一 空白 盘 片 。 

@ 键 和 NEW， 也 就 是 在 键盘 上 键入 N、E、WW 三 个 字 
母 键 并 按 回 车 键 ， 便 将 机 器 中 的 程序 清除 掉 。 然 后 建 立 -- 个 
BASIC 程 序 ， 我 们 暂时 取 名 为 “AUTO”， 下 面 是 此 程序 ， 
功能 是 在 屏幕 上 显示 工作 盘 主 人 姓名 、 建 扒 日 期 。 

10 PRINT “LI MING 1987 .10?” 

20 节 上 ND 

在 键入 此 程序 时 要 注意 有 空格 的 地 方 要 打 入 空格 ， 每 一 
行 输 完 后 要 按 回 车 刍 。 

此 程序 建立 完毕 。 

鳃 键入 初始 化 命令 

] INIT AUTO 
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这 时 机 器 便 开 始 允 空 
完成 。 等 驱动 此 上 灯 素 之 后 ， 有 民间 
明 完 成 了 对 空白 检 片 的 初始 化 深 作 。 

经 过 此 初始 化 操作 的 空白 盘 片 都 丰 有 DOS 膏 作 系统 程 
序 ， 都 可 以 作为 操作 系统 的 引导 盘 进 行 启动 。 

现在 我 们 关 掉 主机 电源 数秒 钟 ， 不 要 将 新 初始 化 的 工作 
盘 片 取出 ， 然 后 打开 主机 电源 ， 屏 幕 上 便 出 现 如 下 信息 ， 

LI MING 1987.10 

] 

这 就 表明 我 们 新 建立 的 工作 盘 可 以 开始 使 用 。 

@) 列 文件 目录 ， 我们 在 使 用 软盘 过 程 中 ， 为 了 存 到 文件 
方便 ， 和 希望 了 解 软盘 片 已 经 存放 有 哪些 文件 ，DOS ”为 我 们 
提供 了 此 功能 ， 通 过 列 磁 盘 目 录 文 件 命令 一 CATALOG 可 
以 完成 这 项 工作 。 

现在 我 们 键入 命令 

CATALOG 

屏幕 上 将 出 现 如 下 信息 ， 

DISK VOLUME 254 

A 002 AUTO 

如 果 换 上 DOS 3.3 系 统 主 盘 ,再 打 入 CATALOG 辣 令 ， 
弃 幕 上 将 出 现 如 下 信息 ， 

DISK VOLUME 254 

* A 008 BELLO 

*T 018 ANIMALS 


格式 化 了 ， 大 约 30 秒 可 以 
上 出 现 提示 符 和 光标 ， 说 
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T 003 APPLR PROMS 

汉 [ 006 APPLESOFT 

% 工 026 APPLEYVYISION 

*#I 017 BIORHYTHM 

# 了 010 BOOT13 

*A 006 BRIAN'S THEME 

# 了 003 CHAILN 

* 009 COLOR DEMO 

* A 009 COLOR DEMOSOFT 

% 009 COPY 

# 了 003 COPY，OBJI0 

#A 009 COPYA 

#A 010 EXEC DEMO 

守卫 020 FID 

* 了 050 FPBASIC 

* 了 050 INTBASIC 

下 面 我 们 看 一 看 目 孙 中 各 疮 分 所 代表 的 合意 ， 

目录 上 方 所 显示 “DISKR VOLUME 254” 表 示 当 前 磁 
冀 的 卷 号 是 254(“ 卷 号 ”是 用 来 区 分 各 个 不 同 的 磁 如 
入 ?我们 在 用 INIT 进行 初始 化 时 可 以 给 磁盘 编 入 不 同 的 
“着 号 ”， 例 如 键入 : 

于 末 罗 TDO320 

便 可 以 建立 一 张 工作 烙 ， 它 的 卷 号 是 120， 以 后 每 次 列 
立 件 月 还 时 ， 便 可 显示 出 此 浴 避 。 若 在 初始 此 时 未 给 出 郑 


DA 


号 ，DOS 自 动 将 卷 号 写成 254。 

肯 录 一 般 分 为 四 部 分 显示 : 

第 一 部 分 给 出 文件 加 锁 的 情况 ， 凡 有 星 号 (* ) 的 ， 表 未 
泳 文件 是 加 了 锁 的 ， 即 DOS 系统 对 该 文件 进行 写 保 护 ， 只 
允许 用 户 对 该 文件 执行 读 操 作 ， 而 不 能 对 其 执行 改名 、 删 除 
各 写 操 作 ， 和 否则， 系统 会 给 出 ，FILE LOCKED 信息 。 

第 二 部 分 给 出 文件 类 型 

A 表示 APPELSOFT 程 序 文件 ; 

I_ 表示 整数 BASIC 程 序 文件 ; 

B 表示 2 进 制 代码 文件 ; 

了 T 表示 文本 文件 ; 

R 表示 由 EDASM 汇 编程 序 所 产生 的 可 浮动 目标 文件 ; 

工 表示 LISA 汇 编程 序 所 生成 的 文件 。 

第 三 部 分 是 三 位 十 进 制 数字 ， 表 示 文 件 在 磁盘 中 所 占用 
的 请 区 数目 。 

一 张 磁盘 共有 35 x 16 =560 个 扇 区 ， 除 去 DOS 文件 管理 
信息 和 文件 目录 所 占 去 的 4 个 磁 通 ， 还 有 496 个 扇 区 用 来 存 

第 四 部 分 是 文件 名 ， 它 由 -- 个 以 字母 开头 ， 长 度 不 超过 
30 个 字符 的 字符 串 组 成 。 

由 于 文件 目录 区 的 限制 ， 一 张 磁盘 最 多 可 以 存 贮 105 个 
文件 。 

使 用 CATALOG 命令 ， 将 首先 给 出 磁盘 上 前 18 个 文件 
的 目录 ， 假 若 你 没有 看 到 光标 ， 表 未 磁盘 上 的 文件 不 止 18 
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个 “按键 盘 上 任 一 键 ， 屏 幕 上 会 接着 显示 ， 也 可 以 用 CTRL 
一 S 键 暂停 列 目录 ， 再 按 任 一 键 使 其 接着 显示 ， 

国保 在 程序 文件 ， 当 我 们 在 主机 上 编制 了 一 个 BASIC 
程序 ， 如 泉 想 将 它 保存 起 来 以 后 再 用 的 话 ， DQS 系统 为 我 
们 提供 了 存盘 命令 ，SAVE， 利 用 这 个 命令 便 会 将 编 制 好 
的 程序 保存 在 软磁盘 上 ， 随 时 可 以 调 出 运行 。 

例如 ， 我 们 在 主机 上 打 入 以 下 程序 ， 

10 HOME 

20 PRINT“ 您 好 ， 欢 迎 您 使 用 中 华 学 习 机 ” 

30 END 

这 是 个 BASIC 程序 , 它 的 作用 是 首先 将 屏幕 清除 于 净 ， 
然后 显示 “您 好 ， 欢 迎 您 使 用 中 华 学 习 机 ”。 当 我 们 检查 完 程 
序 认 为 正确 ， 打 入 RUN -将 此 程序 运行 之 后 ， 便 可 以 保存 
在 工作 盘 上 ， 我 们 把 这 个 程序 取 名 为 AA， 打 入 以 下 命令 : 

] SAVE AA 

执行 这 条 命令 ，BASIC 程 序 “AA” 便 存在 磁盘 上 。 

为 了 验证 一 下 ， 我 们 打 入 列 磁盘 目录 命令 ， 

] CATALOG 

DISK VOLUME 254 

A 002 AUTO 

A 002 AA 

说 明 我 们 建立 的 文件 AA， 已 经 保存 在 磁盘 上 了 。 

使 用 SAVE 命令 时 要 注意 ， 保 存 程序 的 软盘 片 不 能 由 
写 保 护 ， 也 不 能 是 没有 经 过 初始 化 的 空 盘 片 ， 另 外 ， 一 张 盘 
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上 的 文件 不 能 重 名 。 

号 压 入 程序 文件 当 我 们 需要 基 行 磁盘 上 某 一 个 程序 广 
全 迪 必须 首先 将 此 程序 从 磁盘 上 上 调 入 内 存 ， 这 要 用 到 DOS 
命令 LOAD。 

例如 ， 我 们 想 把 工作 盘 上 的 BASIC 程 序 AA 装 入 主机 内 
存 ， 可 键入 以 下 命令 

] LOAD AA 

当 屏 幕 上 再 次 出 现 光 标 时 ， 磁 盘 上 的 AA 程序 已 经 被 装 

主机 内 存 ， 我 们 可 以 列 出 程序 ( 刍 入 LIST ./ ) ， 也 可 恨 
将 它 过 行 (RUN 1)。 

在 用 LOAD 命 令 装 入 程序 时 ， 主 机 内 原 有 的 BASIC 程 
序 将 被 清除 掉 ， 由 新 装 入 的 程序 来 代替 ， 而 软磁盘 上 的 程序 
文件 不 受 影响 ， 也 就 是 说 ， 当 我 们 将 AA 调 入 内 存 后 ， 磁 规 
仍然 保留 着 程序 AA。 

@G@ 文 件 的 删除 、 加 锁 、 和 解锁， 如 果 有 的 文件 没有 保存 价 
值 了 ， 可 利用 DOS 命 令 DELETE 将 其 删除 ， 使 软盘 上 上 仅 保 
痕 下 有 用 的 信息 ， 以 便 腾 出 更 多 的 空间 来 存放 新 的 程序 租 数 
据 。 例 如 ， 我 们 想 把 刚才 建 在 工作 盘 上 的 程序 AA 删 掉 ， 可 
以 打 入 以 下 命令 

] DELETE AA 

便 可 以 将 AA 从 磁 稚 上 删除 掉 并 不 能 再 恢复 。 因 此 ， 在 
运行 此 操作 时 要 十 分 小 心 ， 只 有 证 实 此 文件 确实 无 用 时 ， 珀 
进行 删除 ， 为 了 防止 误 操 作 将 盘 上 重要 文件 删 踪 掉 ， 我 们 天 
坟 将 这 些 文件 用 LOCK 命 令 加 锁 ， 可 键入 ， 
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LOCK AA 

当 我 们 再 用 DELETE AA 命令 来 删除 时 ， 系 统 将 纪 
出 “FILE LOCKED”《 文 件 已 加 锁 ) 的 信息 ， 若 决定 杰 
删除 加 锁 文 件 了 ， 可 以 用 解锁 命令 ， 将 锁 打 开 。 键 入 : 

UNLOCK AA 

然后 再 进行 删除 等 操 秆 。 

@@ 更 改 文件 名 ， 用 RENAME 命令 ， 可 以 将 磁盘 上 的 文 
件 名 进行 更 换 ， 钢 如 要 将 AA 文 件 改 名 为 BB 可 打 入 以 下 命 
令 : 

] RENAME AA，BB 

执行 此 命令 之 后 ， 我 们 再 用 CATALOG 命令 列 一 下 磁 
盘 目 录 ， 

] CATALOG 

DISK VOLUME 254 

A 002 AUTO 

A 002 BB 

这 说 明 程序 文件 AA 已 经 换 名 为 BB, 值得 注意 的 是 DOS 
不 检查 新 名 子 是 否 与 磁盘 上 某 一 个 文件 同名 ， 为 了 避免 造成 
混乱 ， 换 名 时 一 定 要 慎重。 

以 上 我 们 介绍 了 一 些 常 用 的 DOS 命令 ， 人 掌握 了 这 些 命 
令 ， 便 学 会 了 磁盘 机 的 基本 操作 。 除 此 之 外 ， DOS 系统 还 
提供 了 其 它 一 些 命令 ， 列 于 书后 附录 中 ， 供 大家 使 用 时 人 参 
考 。 

(4) DOS 系 统 的 实用 程序 
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以 上 介绍 的 命令 都 包含 在 DOS 系统 之 中 ， 除 此 之 外 . 
DOS 3.3 操作 系统 还 提供 了 一 些 实用 程序 ， 使 用 这 些 程 序 
能 够 建立 主 系统 盘 ， 进 行 软磁盘 的 复制 ， 运 行 整数 BASIC 
等 。 这 些 程序 都 存在 DOQS 3.3 系统 主 盘 里 ， 使 用 时 将 程序 
贡 出 。 


下 面 列 出 DOS 3.3 系统 主 盘 目 录 及 注 炙 : 


DISK VOLUME 254 


* A 008 HELLO 系统 局 动 后 执行 的 第 一 
个 程序 
*T 018 ANIMALS 猜 字 游戏 程序 
工 003 APPLE PROMS 由 RANDOM 程序 建立 
的 随机 文件 
并 006 APPLESOFT 装 入 APPLE9SOFT 甫 
释 程 序 的 实用 程序 
+ 026 APPLEVISION 动画 图 形 表 演 程序 
#T 017 BIORHYTHM 计算 人 体 生 物 曲 线 的 游 
戏 程 序 
* 也 010 BOOT13 13 扇 区 软盘 的 引导 程序 
*A 006 BRIAN'S THEME 高 分 辩 率 作 图 去 范 程 序 
*# 卫 003 CHAIN APPLE9OFT 连 技 程 
序 
*T 009 COLOR DEMO 彩色 示范 程序 
*#A 0090 COLOK 
了 D 丘 MOSOFT 个 彩色 示范 程序 
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并 009 COPY 
#B 003 COPY .OBJI0 


*A 009 COPYA 

*A 010 了 上 XEC DEMO 
* 卫 020 FID 

# 卫 050 FEFPBASIC 


# 卫 050 INTBASIC 


兴 A 003 MAKEE 工 尼 和 X 工 


* 卫 009 MASTER 
CREATE 
*# 卫 027 MUFFIN 


# 必 051 PHONE LIST 


A 010 RANDOM 


*A 013 RENUMBER 


ss 人 039 RENUMRER 


软盘 复制 程序 

软盘 复制 程序 所 需 用 到 

的 RWTS95 

软盘 复制 程序 

也 XEEC 命 令 的 示范 程序 

软盘 管理 程序 

APPLESOFT 解释 程 

序 

整数 BASIC 解释 程序 

由 HELLO 程 序 装 入 

建立 文本 文件 的 示范 程 

序 

建立 主 系 统 盘 的 使 用 程 

序 

将 13 扇 区 的 文件 转换 成 

16 扇 区 文件 的 实用 程序 

存 贮 电 话 号 码 的 应 用 程 

序 

使 用 随机 文件 的 库存 管 

理 示范 程序 

对 APPLESOFT 程序 

可 重新 编 行 号 的 使 用 得 

序 

RENUMBER 实用 程 
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INSTRUCTIONS 序 的 使 用 介绍 

*#A 003 RETRIEYVE TEXT 取 文 本 文件 的 实用 程序 

对 -- 些 非常 有 用 的 使 用 程序 ， 我 们 将 在 附录 里 给 出 其 使 
用 方法 。 

(5) 在 BASIC 程 序 中 使 用 DOS 命 令 

前 面 介绍 的 DOS 命令 ， 都 是 由 键盘 输入 直接 执行 的 。 
另外 在 BASIC 程序 中 ，DOS 命令 也 可 以 作为 一 条 特殊 的 
BASIC 语 名 被 调用 。 

在 BASIC 程 序 中 使 用 DOS 命令 ， 必 须 将 DOS 命令 写 
在 PRINT 语 名 中， 并 且 必 须 在 前 面 加 上 CTRL 一 D 

调用 DOS 命 令 的 语句 格式 ， 

PRINT “CTREL 一 D DOS 命令 和 人 参考” 

其 中 CTRL 一 D 的 键入 方法 是 ， 按 住 CTRL 键 ， 再 硕 D 


键 ， 同 时 必须 保证 CTREL 一 D 前 是 回 车 字符 。 
另外 ， 也 可 以 用 CHR 否 (4) 来 代 堆 CTREL 一 D， 格 式 如 
下 ， 


PRINT CHR$(4)， “DOS 命 令 和 参数 

例如 下 面 一 段 程序 将 显示 磁盘 上 月 录 ， 

10 王 OME 

20 PRINT CHR 册 (4)8 “CATALOG” 

30 END 

通过 这 一 章 的 学 习 ， 我 们 基本 上 可 以 掌握 磁盘 操作 了 ， 
但 是 ， 如 宛 诅 心 应 乎 地 运用 DOS 命 冬 ， 还 需要 反复 实践 才 
行 ! 
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七 、 中 华 学 习 机 的 维护 与 保养 


79 ,微机 发 生 故 障 的 一 般 原因 


微型 计算 机 具有 工作 可 靠 、 速 度 快 、 使 用 方便 等 优点 。 
但 是 ， 它 也 和 其 它 机 器 一 样 ， 会 出 现 故 障 ， 造 成 放 障 的 一 般 
原因 ， 大 致 有 以 下 几 种 ， 

(ti) 电网 电 夸 不 稳定 ， 突然 掉 电 和 加 电 ， 有 瞬 态 脉冲 电压 
过 高 ， 都 有 可 能 使 微机 造成 损坏 。 

电压 不 稳定 一 般 是 电压 不 足 ， 当 电压 在 170V 左右 时 ， 
电源 内 的 调 压 器 就 不 能 供给 足够 的 电压 ， 从 而 使 数据 显示 混 
乱 。 有 时 ， 还 会 造成 系统 工作 间 电 。 

突然 掉 电 与 加 电 时 ， 会 有 高 频 脉 冲 产生 ， 这 些 尖 峰 信 号 
偶然 也 会 越过 滤波 保护 进入 逻辑 电路 ， 一 般 情 况 是 抹 掉 或 改 
变数 据 ， 但 有 时 也 会 损坏 电路 器 件 。 

有 瞬 态 高 频 脉 冲 电压 干扰 是 与 回路 中 负载 情况 有 关 ， 世 与 
外 界 磁 场 有 关 。 如 马达 、 电 焊 机 的 局 停 等 ， 会 突然 产生 一 个 
维持 儿 周 或 儿 十 周 的 高 幅度 变化 的 电压 现象 ， 这 种 现象 的 发 
生 对 机 器 的 危害 最 大 。 

(2) 工作 环境 益 ， 灰 尘 过 多 ， 会 使 机 器 出 错 划 盘 。 温 度 
过 高 ， 元 件 内 部 过 热 ， 会 使 元 件 过 早老 化 而 坏 掩 。 

灰尘 会 被 计算 机 和 显示 器 中 的 静电 荷 吸 附 。 当 灰尘 过 多 
时 ， 会 阻碍 元 器 件 散热 ， 机 内 温度 就 会 比 正常 情况 要 高 。 因 
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此 ， 会 使 芯片 及 其 它 组 件 坏 得 更 快 。 尤 其 是 磁盘 驱动 器 因为 
次 人 尘 而 造成 的 故障 最 多 ， 这 是 因为 在 磁盘 驱动 器 内 部 ， 是 依 
靠 磁头 来 进行 读 写 的 ， 磁 头 和 磁 规 之 间 的 上 距 离 非常 小 ， 当 夏 
头 悬 浮 在 磁盘 表面 上 时 ， 灰 尘 和 杂质 会 引起 许多 故 河 ， 外 来 
杂质 微粒 如 烟尘 、 纤 维 ， 都 可 能 引起 磁 描 驱动 器 突然 的 故 
障 。 

当 机 器 内 部 的 适配器 接口 板 增多 时 ， 热 量 就 不 会 即时 排 
除 ， 造 成 机 器 内 部 温度 过 高 ， 这 样 就 会 造成 电子 元 器 件 过 里 
老 化、 接点 处 断路 ， 当 温度 过 高 时 ， 就 会 出 现 丢失 数据 等 现 
象 。 

43) 人 为 事故 。 如 摔 坏 、 揪 错 电 源 、 搬 错 搬 件 位 置 ， 不 
按 操作 规程 办 事 ， 等 等 。 也 有 的 使 用 不 当 ， 如 将 打印 机 装 错 
纸 , 打 印 头 卡 纸 ,使 打印 头 损坏 ， 或 烧 坏 电机 ， 这 些 也 是 造成 
微机 出 现 故 障 的 因素 。 

当然 除了 以 上 原因 之 外 ， 机 器 本 身 工 作 不 稳定 、 组 件 失 
效 也 是 造成 机 器 故障 的 原因 。 但 这 也 与 使 用 条 件 有 密切 关 
系 。 因 而 要 想 减 少 事 故 ， 延 长 机 器 寿命 ， 就 要 清除 一 切 对 机 
器 不 利 因素 ， 做 好 日 常 维护 工作 。 

80 .中 华 学 习 机 的 维护 与 保养 

(1)》 建立 一 个 妇 好 的 工作 环境 

工作 环境 对 中 华 学 习 机 的 运行 和 使 用 寿命 有 很 大 影响 。 

中 华 学 习 机 的 工作 环境 应 该 是 这 样 的 :温度 在 10 一 407D ， 
大 冷 太 热 都 会 使 机 器 工作 不 稳定 黄 至 无 法 工作 。 相 对 湿度 一 
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般 在 20 一 80 另 ,最 好 在 35 一 65 狗 之 间 ,应 尽量 避免 日 光照 射 。 
这 是 因为 显示 器 的 工作 主要 是 靠 荧光 粉 的 作用 ， 日 光 的 照射 
将 会 使 荧光 粉 脱 落 ,从 而 造成 显示 器 不 能 正常 工作 。 因 此 ,最 
好 做 一 个 置 子 将 机 器 时 住 ， 既 可 以 避免 日 照 ， 又 可 以 防止 亦 
尘 落 入 机 器 。 当 机 器 内 积 有 灰 竺 时 ， 要 及 时 清除 掉 ， 可 以 用 
酒精 棉 球 来 进行 氛 试 。 

(2) 要 有 一 个 稳定 的 电源 

中 华 学 习 机 和 其 它 微机 一 样 对 电压 的 波动 非常 敏感 ， 要 
想 使 设备 的 故障 减少 ， 就 必须 有 一 个 稳定 的 电源 。 

对 于 电压 不 稳定 的 地 方 要 使 用 稳 压 电源 ， 对 于 经 常 停电 
又 突然 加 电 的 地 方 ， 可 以 使 用 不 间断 电源 。 这 种 电源 是 在 外 
界 供电 停止 后 ， 自 动 将 内 部 的 蘑 电 池 中 的 直流 电 换 成 交流 
电 ， 当 外 界 供电 时 ， 它 又 自动 停止 工作 ， 把 外 电源 自动 接 
入 。 

(3) 磁 插 和 磁盘 驱动 器 的 保护 

个 磁盘 的 保护 

A .不 要 弯曲 、 折 琶 磁 盘 ， 不 要 将 磁 失 靠近 强 磁 场 。 

B .不 能 用 手 摸 磁盘 上 的 读 写 窗 口 ， 应 当 保持 清洁 ， 防 


止 灰 侍 落 入 。 
C .注意 磁盘 的 工作 环境 ， 温 度 、 湿 度 、 太 冷 、 太 热 都 
会 使 磁盘 变形 。 


D .不 要 在 已 贴 上 磁盘 的 标签 上 写字 ， 因 为 圆珠笔 及 名 
笔会 在 盘 表 面 留 下 冲 痕 。 应 先 写 完 标签 ， 再 将 标签 贴 在 盘 套 
上 。 


四 软盘 驱动 器 的 日 常 保养 ， 软 抬 了 驱动 器 使 用 素 最 高 ， 也 
最 容易 出 故障 。 因 此 ， 要 维护 好 机 器 ， 首 先 要 维护 好 软 盐 驱 
动 器 。 软 盘 驱 动 器 之 大 鼠 是 灰尘 ， 多 数 故 障 的 出 现 是 划 盘 ， 
即 把 磁盘 才 面 的 磁 涂 层 磨 掉 了 ， 从 而 不 能 正确 地 记录 数据 而 
出 现 错误 。 因 而 ， 清 洗 磁 头 是 磁盘 驱动 器 日 常 保 养 的 重要 工 
作 。 其 方法 如 下 : 

A .用 清洗 盘 氛 磁 头 ， 市 场 上 有 一 种 清洗 盘 ， 可 以 用 它 
来 清洗 磁头 。 它 是 一 种 特制 的 软盘 ， 灌 入 清洁 液 ， 放 入 驱动 
器 中 ， 使 它 转动 后 ， 则 灰尘 和 磁头 上 的 污 拍 被 清洗 盘 所 吸 
收 。 

B .用 清洁 波 擦 洗 磁 头 ， 用 一 个 棉花 棒 沾 上 酒精 或 高 让 
里 买 来 的 擦 录音 视 磁 头 用 的 清洁 波 来 擦洗 磁头 。 用 棉花 棒 控 
磁头 一 定 要 小 心 ， 不 要 把 磁头 碰 坏 。 

以 上 介绍 了 中 华 学 习 机 最 基本 的 维护 和 保养 知识 ， 只 要 
坚持 日 常 维护 ， 又 能 按照 正确 的 操作 规程 使 用 ， 你 的 中 华 学 
习 机 就 一 定 会 延长 寿命 ， 经 常 处 于 良好 的 工作 状态 。 
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附录 A 中 华 学 习 机 的 作 图 功能 (BASIC) 


一 、 中 华 学 习 机 的 显示 方式 


中 华 学 习 机 共有 五 种 显示 方式 ， 主 要 分 为 两 大 类 ， 一 类 
为 文本 显示 方式 ， 一 类 为 图 形 显示 方式 。 图 形 显示 方式 又 分 
为 低 分 辩 率 图 形 和 高 分 辨 率 图 形 。 混 合 方式 是 字符 和 图 形 同 
时 在 屏幕 上 显示 ， 无 论 在 低 分 辨 率 和 高 分 辨 率 方式 下 ， 屏 幕 
下 方 都 留 有 四 行 的 文本 显示 区 。 

1 .文本 显示 

全 屏幕 24 行 ， 每 行 40 个 字符 ， 共 计 960 个 字 。 显 示 方 式 
采用 中 正常 方式 一 一 黑 底 白 字 ， 外 反 向 方式 一 一 白 底 黑 字 3 
父 闪 烁 方式 一 一 正常 方式 与 反 向 方式 交替 。 

2. 低 分 辨 率 图 形 显示 

低 分 辩 率 图 形 显示 是 由 颜色 块 组 成 的 ， 每 一 行 有 40 块 颜 
色 抉 ,但 颜色 块 的 行 数 比 文本 显示 的 字符 行 数 多 一 倍 。 若 把 低 
分 辩 率 图 形 的 紧 挨 着 的 两 行 看 作 一 行 ， 每 一 块 颜色 块 由 上 、 
下 两 块 组 成 ， 那 么 一 整 块 颜色 块 就 与 文本 显示 时 一 个 字符 的 
大 小 一 样 了 。 在 低 分 辨 率 状态 下 ， 可 用 40x 40， 即 1600 块 颜 
色 氛 显示 图 形 ， 用 地 下 面 的 四 行 显示 文本 。 
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3. 离 分 辩 率 多 形 显 示 

高 分 辨 率 图 形 显示 280 x 192 个 彩色 点 的 点 阵 ， 高 分 辨 率 
图 形 显示 数 据 存 贮 在 两 个 八代 的 存 贮 区 中 ， 这 两 个 存 贮 器 分 
别 叫 做 显示 页 面 1 和 显示 页 面 2 。 

在 显示 高 分 辩 率 图 形 时 ， 屏 幕 下 面 的 四 行 显 示 文 本 。 

以 下 几 个 命令 用 于 低 分 辩 率 彩色 作 图 。 

(1) GR 

功能 ， 该 语句 的 作用 是 将 屏幕 置 成 低 分 辨 率 作 图 状态 ， 
这 时 ， 屏 幕 上 的 图 形 显示 窗口 为 40 x40， 窗 口 下 留 4 行 供 文 
本 使 用 。GR 命令 自动 将 屏幕 清 为 黑色 ， 光 标 移 到 文本 行 的 
开头 ， 因 此 ，GR 命令 有 清除 低 分 辨 率 图 像 画 面 的 作用 ， 但 
闻 时 原 图 像 区 的 图 像 也 被 破坏 。 

(2) COLOR 

格式 ，COLOR = 人 《算术 表达 式 》 

功能 ， 在 低 分 辩 率 作 图 状态 下 选择 画面 的 颜色 。 如 果 算 
术 表 达 式 是 一 个 实数 ， 它 会 被 转换 为 一 整数 。 算 术 表 达 式 的 
取 值 范围 是 0 一 255， 但 被 处 理 为 0 一 15。0 一 15 的 数 与 16 种 颜 
色 对 应 如 下 ， 


0 ”黑色 8 棕色 
1 红色 9 橙色 
2 深蓝 色 10 灰色 
3 紫色 11 粉红 色 
4 深 绿色 12 浅 绿 色 
5 灰色 13 黄色 


6 中 蓝 色 14 绿 蓝 色 


7 浅 蓝 色 15 白色 
GR 命令 将 COLOR 置 0 ， 即 为 黑色 。 
(3) PLOT 


格式 ，FLOT (算术 表达 式 1 )， (算术 表达 式 2 ) 

功能 ， 在 低 分 辩 率 作 图 状态 中 ， 将 一 个 点 〈 即 一 块 颜色 
块 ) 放 在 坐标 为 〈 算术 表达 式 1 ， 算 术 表达 式 2 ) 处 。 点 的 
颜色 由 最 近 执 行 的 COLOR 语 名 决定。 

由 于 低 分 辨 率 作 图 状态 下 ， 屏 幕 的 图 形 显示 窗口 为 40X 
40， 所 以 算术 表达 式 1 和 算术 表达 式 2 的 取 值 范围 为 0 人 ~ 
39。 

(4) HLIN 

格式 ，HLIN (算术 表达 式 1 )， (算术 表达 式 2 )， 

AT( 算 术 表 达 式 3 ) 

功能 ， 在 低 分 准 率 作 图 状态 下 ， 画 一 条 从 点 《算术 表达 
式 1， 算 术 表 达 式 3 ) 到 点 (算术 表达 式 2 ,算术 表达 式 3 ) 
的 水 平 直线 ， 线 的 颜色 由 最 近 执 行 的 COLOR 语句 决定 。 

算术 表达 式 1 ， 算 术 表 达 式 2 ， 算 术 表 达 式 3 的 取 值 范 
围 是 0 一 39。 

(5) VLIN 

格式 ，VLIN (算术 表达 式 1 ) ，( 算术 表达 式 2 )， 

AT (算术 表达 式 3 ) 

功能 ， 在 低 分 辨 率 作 图 状态 下 ， 画 一 条 从 点 〈 算术 表达 

式 3 ， 算 术 表 达 式 1 ) 到 点 (算术 表达 式 3 。 算 术 表 达 式 2 ) 
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的 垂直 直线 ， 线 的 颜色 由 最 近 执 行 的 COLOR 语 名 决定 。 

(6) 了 忆 X 工 

格式 ，TEXT 

功能 ， 作 用 是 把 屏幕 从 低 分 辨 来 作 图 状态 或 两 种 高 分 状 
率 作 图 状态 之 一 返回 多 屏幕 文 本 状态 〈 每 行 40 个 字符 ， 共 24 
行 )。 


下 面 给 出 几 个 简单 的 低 分 辨 挛 状 态 下 作 图 的 例子 。 
[ 例 1] 在 屏幕 上 显示 16 种 颜色 。 

10 GR 

20 HOME 

30 FOR I=1 TO 31 

35 COLOR =I/2 

40 VLIN 0，39 AT IT 

50 NEXT 1 

60 END 

「 例 2] 在 屏幕 上 显示 不 断 变换 的 图 案 花 。 
10 GR 

20 FOR A=3 TO 5 

30 FOR B=1 TO 19 

40 FOR C=0 TO 19 

50 S=B+C 

60 COLOR=C+3/(B+3) 十 Bs A/12 
70 PLOT B，S 
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80 PLOT S$，B 

90 PLOT 40 一 B，40 一 9 
100 PLOT 49 一 9，40 一 也 
110 PLOT 5，40 一 B 
120 PLOT 40 一 B，3 
130 PLOT B，40 一 9 
140 PLOT 40--95，B 
150 NEAXT C 

160 NEXT B 

170 NEXT A 

180 END 


二 、 高 分 辨 率 作 图 


高 分 辩 率 作 图 共有 以 下 几 条 命令 ， 

(1) HGR 

格式 ，HGR 

功能 ， 将 屏幕 置 成 高 分 辩 率 作 图 状态 ， 屏 幕 清 为 黑色 ， 
显示 窗口 的 总 网 格 数 为 280〈X 方 向 ) x 160(Y 方 向 )， 窗 
口 下 留 四 行 供 文 本 使 用 。 这 个 命令 显示 的 是 高 分 辩 率 作 图 状 
态 下 存 贮 器 (8K 一 16K) 的 页 面 1 。 

(2) HGR2 

格式 ，HGR2 

功能 ， 这 个 命令 置 全 屏幕 为 高 分 辨 率 280( 叉 方 向 )》 
xX192(Y 方 向 ) 作 图 状态 ， 设 有 文本 说 明 行 ， 使 用 的 是 存 贮 
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器 (16K 民 一 24K) 的 页 面 2 。 

(3) HCOLOR 

格式 ，HCOLOR = (算术 表达 式 ) 

功能 ， 由 算术 表达 式 的 值 决定 高 分 辩 率 作 图 的 颜色 。 算 
术 表 达 式 的 取 值 范围 是 0 一 7， 对 应 颜色 为 ; 


0 黑色 1 4 黑色 2 
1 绿色 5 红色 
2 紫色 6 ”黄色 
3 白色 1 7 白色 2 


由 下 COLOR = (算术 表达 式 ) 命令 所 画 的 点 的 颜色 还 
取决 于 该 点 在 屏 冰 上 的 位 置 。 例 如 HCOLOR =1， 该 点 处 在 
偶数 列 (0，2，4，…，278) 则 显示 紫色 ， 处 在 奇数 列 (0，1， 
35，,…，279) 则 显示 绿色 。HGR 和 HGR2 命 令 都 将 HCOLOR 
置 为 0 ， 即 显示 黑色 。 

(4) HPLOT 

格式 ，@HPLOT (算术 表达 式 1 ) ，( 算 术 表 达 式 2 ) 

@HPLOT TO 算术 表达 式 3 ) ，《〈 算术 表达 
式 4) 
人 HPLOT (算术 表达 式 1 )， (算术 表达 式 2 ) 
TO (算术 表达 式 3 ) ，( 算术 表达 式 4 ) 
TO (算术 表达 式 5 ) ，( 算术 表达 式 6 ) 
功能 ， 

@@ 该 命令 在 X= ( 算术 表达 式 1 ) ，Y= (算术 表达 式 

2 ) 〈X，Y) 上 画 一 个 高 分 辩 率 的 点 ， 颜 色 由 最 近 执行 的 
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了 COLOR 语 知 决 定 。 

国 该 命令 从 上 次 画 的 点 到 点 (算术 表达 式 3 ， 算 术 表 达 
式 4 ) 画 -- 条 直线 。 如 果 画 完 上 一 点 后 ，HCOLOR 的 值 已 
改变 ， 但 这 条 线 的 颜色 仍 由 上 上 次 画 的 点 的 颜色 决定 ;车 前 而 
没有 珊 过 -个 点 ， 那 么 这 条 命令 不 能 画 一 条 线 。 

钨 该 命令 从 点 〈 算术 表达 式 1 ， 算 术 表 达 式 2 ) 到 点 
(算术 表达 式 3 ， 算 术 表 达 式 4 ) 画 一 条 直线 ， 颜 色 由 最 近 
执行 的 HCOLOR 语句 决定 ， 如 果 对 这 个 命令 进行 扩展 ， 气 
画 线 几 乎 可 以 不 受 限制 地 延伸 。 所 受 限 制 只 有 两 点 ，a, 屏 者 
限制 ;b .每 个 命令 最 多 239 个 字符 。 

HPLOT 命 令 必须 在 HGR 和 HGR2 被 执行 后 方 可 执行 。 
X 方 向 的 横 坐 标 耳 值 范围 是 0 一 279，Y 方 向 的 坐标 取 值 范围 
是 0 一 191。 

要 从 高 分 辨 率 作 图 状态 回 到 文本 状态 ， 只 要 打 入 命令 
了 辽 X 工 即 可 。 

下 面 给 出 一 段 程序 ， 运 行 后 将 在 屏幕 上 画 出 一 条 抛物 
爱 : 

10 HGR 

20 A= 一 11 

30 B=11 

40 C 一 0.1 

50 X1 一 As*8 十 140 

60 Y1 一 158 一 (A++ 2) 汪 1.2 

?0 HHCOLOR = 一 3 
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80 HPLOT 0，158 TO 279，158 
90 HPLOT 140，160 TO 140，0 
100 FOR X=A TO DB STEP 心 
110 X2 一 140 二 8* 入 

120 Y2 王 158 一 (入 人 2) ”1.2 

130 HPLOT X1，Y1 TO X2，Y2 
140 XI1 一 又 2 

150 Y1 一 Y2 

160 NEXT X 

170 卫 ND 


利用 高 分 辩 率 可 以 作出 许多 图 形 ， 关 键 在 于 计算 点 的 坐 
标 ， 大 家 可 以 自己 下 去 多 实践 。 

中 华 学 习 机 除了 上 面 介绍 的 儿 种 作 图 外 ， 还 有 其 它 方 
法 ， 这 里 就 不 作 介绍 了 。 
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附录 B ”中 华 学 习 机 上 的 音响 (BASIC) 


在 中 华 学 习 机 的 机 盒 内 ， 有 一 只 0.25W89 的 扬声器 ， 
在 软 开关 的 控制 下 ， 扬 声 器 可 以 发 出 各 种 响声 。 

那么 怎样 才能 让 扬声器 发 出 的 声音 变 成 优美 的 乐曲 呢 ? 
这 就 要 取决 于 音调 和 发 声 的 长 短 。 

声音 的 音调 取决 于 信号 的 频率 ， 下 面 的 表格 列 出 了 音阶 
和 对 应 的 频率 〈 频率 用 * 值 表示 ) : 


站 TREE -er 
| zx 全 | 255 | 228|205 | 192 171|152 140|128|114| 102| 95 | 84 75 本 


1 0 
| 


[| 加 西西 西 员 四 


he: 14 


| 
1 


发 出 声响 的 长 短 取决 于 信号 维持 时 间 的 长 短 ， 下 表 列 出 
了 发 声 时 间 与 对 应 的 音 长 (Y 值 代表 发 声 时 间 ) : 


人 | 是 110 0 160， 四 255 
妈 | | 2 拍 | 4 拍 | 
当 我 们 规定 好 音阶 和 音 长 之 后 ， 用 下 面 的 语句 便 可 以 使 


扬声器 奏 出 乐曲 来 。 
语句 MUSIC 


格式 ，MUSIC X，Y 
功能 ， 定 义 一 个 音阶 和 音 长 ， 并 使 扬声器 发 声 。 
[【 例 ] 下 面 一 段 程序 可 以 使 扬声器 奏 出 音节 旋律 。 
10 FOR I=1 TO 15 
20 READ 又 ，Y 
30 MUSIC X，Y 
40 NEXT I 
50 DATA 255，160，228，160，205，160， 192， 
160，171，160，152，160，140，160，128，160， 
114，160，102， 160，95，160，84， 160， 75， 
160，68，160，62，460 
除了 用 MUSIC 语句 可 以 让 中 华 学 习 机 演奏 乐曲 之 外 ， 
还 可 以 用 PEEK 函 数 ( 读 内 存 某 一 单元 内 容 ) 去 读 与 扬声器 
有 联系 的 -16336 号 存 贮 单元 ， 也 能 够 达到 让 中 华 学 习 机 演 窒 
音乐 的 目的 。 
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附录 C 出错 信息 表 


当 -- 个 错误 发 生 后 ， 程 序 不 能 继续 执行 ， 系 统 给 出 错误 
信息 ， 我 们 可 以 根据 出 错 信 息 ， 找 出 程序 中 的 错误 ， 修 正之 
后 ， 继 续 运 行 。 

出 错 信息 的 格式 如 下 ， 

立即 执行 方式 的 语句 ，?XX 节 RROR 

间接 执行 方式 的 语句 ，?XX_ ERROR IN YY 

其 中 ，XX， 表 示 错 误 码 ， 也 就 是 错误 信息 

YY: 产生 错误 的 语句 行 号 。 

以 下 列 出 可 能 产生 的 出 错 信息 及 其 含义 ， 

CAN'T CONTINUE 

执行 一 个 不 存在 的 或 者 已 经 出 错 的 程序 ， 或 者 想 执行 某 
个 已 经 误 删 了 一 些 行 的 程序 。 

DIVISION BY ZERO 

除数 为 零 。 

ILLEGAL DIRECT 

在 立即 拓 行 方式 中 ， 使 用 了 INPUT、DEFFN，GET 
或 DATA 等 语句 。 

ILLEGAL QUANTITY 
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冰 数 的 自 变量 违反 了 数学 的 定义 或 超出 了 系统 允许 的 到 
值 范 围 ， 主 要 有 以 下 几 种 ， 

电 负 数 为 数组 下 标 变量 (例如 ，A(--1) =3)。 

@ 用 LOG 函 数 时 ， 自 变量 为 负数 或 零 。 

的 用 SQR 画 数 时 ， 自 变量 为 负数 ; 

昌 A 人 B 中 B 不 是 整数 时 ，A 为 负数 。 

轿 在 MID ，LEFT 和 ,RIGHT 下 ,WAIT，PEEK， 
POKE，TAB，SPC，ON … GOTO 或 作 图 的 任 一 函数 中 
使 用 了 不 恰当 的 自 变量 。 

NEXT WITHOUT FOR 

有 NEXT 语 名 而 无 与 之 对 应 的 FOR 语句 ,或 NEXT 语 名 
中 的 变量 与 配对 的 FOR 语句 中 的 变量 不 一 致 。 

OUT OF DATA 

执行 一 个 READ 语 名 时， 程序 中 的 所 有 DATA 语句 是 
已 被 读 完 ， 而 程序 试图 要 读 更 多 的 数据 。 

OUT OF MEMORY 

程序 太 长 ,变量 太 多 ,FOR 循环 嵌 套 多 于 10 层 ，GOSUB 
多 于 24 层 ， 表 达 式 太 复 杂 ， 括 号 和 嵌 套 超过 36 层 ， 置 
LOMEM 或 HIMEM 时 太 高 或 太 低 都 属于 这 种 情况 。 

FORMULA TOO COMPLEX 

执行 到 多 于 两 条 TF“XX”THEN 形 式 的 语句 。 

OVEREFLOW 

计算 的 结果 太 大 ， 超 出 机 器 系统 的 处 理 范围 ， 如 果 产 生 
下 溢 ， 屏 幕 上 只 出 现 零 ， 而 没有 任何 出 错 信息 。 
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REDIM'D ARRAY 

对 一 个 数组 两 次 使 用 DIM 语句 时 产生 此 错误 。 这 个 错误 
邹 常 发 生 的 情况 是 ,如 果 直 挡 使 用 像 A(D =5 这 样 的 语句 , 则 
BASIC 自动 定义 其 标量 长 度 为 14， 但 在 程序 中 又 归 有 如 
DIM A(100) 的 语句 。 

RETURN WITHOUT GOSUB 

在 程序 中 没有 相应 的 GOSUB 河 句 ， 而 出 现 RETURN 
语句 。 

STRING TOO LONG 

一 个 字符 串 〈 可 能 由 几 个 字符 串 连 接 而 成 的 ) 长 度 超过 
了 255 个 字符 。 

BAD SUBSCRIPT 

引用 了 不 在 数组 维 数 定义 范围 之 内 的 数组 元 素 。 如 当 信 
已 经 用 DIM A(3，2) 定义 了 ， 却 又 出 现 了 A(2，2，2) = 也 
的 语句 。 

SYNTAX ERROR 

在 语句 中 出 现 了 句法 错误 ， 比 如 使 用 不 正确 的 标点 符 
号 ， 或 遗漏 括号 等 等 。 

TYPE MISMATCH 

冉 值 语句 中 等 号 两 边 的 类 型 不 匹配 ， 如 左边 用 数值 量 ， 
而 右边 却 是 字符 串 。 另 一 种 情况 是 一 个 函数 的 参数 类 型 是 一 
企 串 ， 但 给 出 的 却 是 一 个 数值 型 数据 ， 或 者 相反 。 

UNDEF'D STATEMENT 

使 GOTDO、GOSUPB 或 了 THEN 语 名 转向 程序 中 不 存在 的 
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语句 标号 。 
UNDEF2:D FUNCTION 
使 用 了 用 户 未 曾 定 义 过 的 函数 。 
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有 录 D D0S35.3 磁 盘 操作 系统 命令 及 使 用 


一 、D03 命 令 格 式 


DOS 命 令 由 命令 保留 字 和 命令 参数 二 部 分 组 成 。 
命令 保留 字 代 表 了 DOS 操作 系统 所 提供 的 命令 ， 命 令 
参数 则 是 混 供 DOS 命令 执行 时 所 需要 的 辅助 信息 ， 对 可 有 
可 元 的 参数 ， 用 方 括号 [形式 给 出 。 
DOS 命 令 格式 如 下 ; 
COMMAND f [，Vn] 
其 中 ，COMMAND: 为 命令 保留 字 
f， 文件 名 ,是 以 字母 打头 的 字符 串 〈 其 中 不 能 含有 
逗号 ) ;文件 名 的 有 效 长 度 最 多 可 达 30 个 字符 
Vn:， 为 磁盘 的 卷 号， 一 张 磁 可 只 能 有 一 个 卷 号 ， 
! 的 值 可 以 是 1 一 254 之 间 的 整数 。 
方 括号 表示 此 项 为 可 选项 。 
二 、D03 命 令 的 执行 方式 
在 引导 DOS 操 作 系统 之 后 ， 调 用 DOS 命令 的 方法 有 两 
种 ， 包 立即 方式 ! 四 程序 方式 。 
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1. 立 即 执行 方式 

在 BASIC 提 示 符 下 ， 直 接 打 入 DOS 命 令 ，DOS 将 立即 
执行 该 命令 ， 这 种 方式 称 为 立即 执行 方式 。 

可 以 立即 执行 的 DOS 命令 有 :，BLOAD、 BRUN、 
BSAVE、CATALOG、CLOSE、DELETE、EXEC、 
FEP、INIT、IN#+、INT、LOAD LOCK;，MAXFILES: 
MON NOMON 和 PR 妇 RENAME， RUN SAVE 
UNLOCK VERIFY 

2 .程序 调用 方式 

在 BASIC 程序 中 ，DOS 操作 系统 命令 均 可 作为 一 条 特 
珠 的 BASIC 语句 被 调用 ， 它 与 一 般 的 BASIC 语句 不 同 的 
是 ， DOS 操作 命令 必须 通过 一 条 特殊 的 PRINT 语句 来 执 
行 。 这 条 PRINT 语 名 将 DOS 命令 及 其 命令 参数 作为 一 给 出 
行进 行 输出 ， 而 在 这 输出 行 的 第 一 个 字符 是 CTRL-D。 

CTRL-D 是 DOS 命 令 的 引导 标记 ， 当 BASIC 解释 程序 
执行 PRINT 语 锯 时 ， 遇 到 第 一 个 输出 字符 是 CTRL-D， 由 
作为 DOS 命 令 考 处理。 

3. 调 用 D0S 命 令 的 语句 格式 

PRINT “CTRL-D DOS 命 令 和 命令 参数 ? 

或 PRINT CHR $(4) “DOS 命 令 和 命令 参数? 

使 用 该 语句 应 注意 以 下 几 点 : 

(1) 在 一 个 PRINT 语 句 中 ， 只 能 含有 一 条 DOS 命令 ， 
而 在 这 个 程序 行 中 必须 以 CTRL 一 了 D 字符 或 CHR 员 (4) 开 
头 ， 以 回 车 (RETURN) 或 回 车 字符 (CTREL 一 M) 表示 DOS 
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命令 的 结束 。 
(2) 在 此 语句 之 前 的 最 近 一 条 PRINT 语句 ， 必 须 以 回 
车 符 结 束 。 
仅 能 以 程序 调用 方式 执行 的 DOS 命 令 有 
APPEND，CLOSE， OPEN POSITION 
READ， WRITE 


三 、 初 始 化 命令 


格式 ，INIT f[，Van] 

功能 :初始 化 软 共 ， 并 把 已 建立 在 内 存 中 的 BASIC 程 
序 作为 DOS 操作 系统 引导 后 ， 装 入 并 运行 的 第 一 个 程序 存 
入 软盘 ， 冠 以 文件 名 f。 


四 、 管 理 磁盘 文件 的 D0S 命 令 


1.CATALOG 命令 

格式 ，CATALOG 

功能 ， 显 示 盘 片 的 文件 目录 ,目录 中 包括 :磁盘 的 卷 号 ， 
文件 的 名 称 ， 文 件 所 占用 盘 片 的 扇 区 号 ， 文 件 的 类 型 和 文件 
的 封锁 标志 等 。 

文件 的 类 型 显示 如 下 ， 

A， 表 示 Applesoft BASIC 程 序 

I， 表 示 整 数 BASIC 程 序 ， 

B:， 表示 二 进 制 文件 

了 T， 表 示 文 本 文件 
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2.LOCK 命 仿 

格式 ，LOCK f [，Van] 

功能 ， 该 命令 将 对 指定 的 文件 置 封 锁 状 态 ， 也 就 是 写 保 
护 状 态 ， 使 得 该 文件 不 会 因 意 外 的 写 、 修 改 、 删 除 . 命 名 等 操 
作 而 遭受 破坏 。 对 于 被 封锁 的 文件 ， 在 列 磁盘 文件 目录 时 ， 
在 其 最 前 面 将 有 一 星 号 (* )。 

3.UNLOCK 命令 

格式 ，UNLOCK f [，Van] 

功能 ， 解 除 对 指定 文件 的 封锁 ， 使 得 此 文件 可 以 被 删 
除 ， 重 新 命名 、 修 改 或 重 写 ， 解 除 文件 封锁 后 ， 封 锁 标 志 将 
消失 。 

4.RENAME 命 令 

格式 ，RENAME fi，f，[，Van] 

功能 ， 修 改 文件 名 ， 用 文件 名 屯 代替 文件 名 fl ， 改 名 后 
文件 内 容 不 受 影 响 。 

这 里 f 是 一 个 已 存在 软盘 上 的 文件 名 ，f: 则 是 软盘 上 没 
有 的 新 名 ，f 文 件 不 被 加 锁 。 

例如 ，RENAME AAA，B3B 

执行 此 命令 后 磁盘 上 原 有 的 文件 AAA， 将 改名 为 BBE。 

5.VERIFY 命 令 

格式 ，VERIFY fl [，Van] 

功能 ， 通 过 读 操 作 ， 对 指定 文件 f 进行 检查 ， 以 确定 该 
文件 在 软盘 上 的 信息 是 否 正确 。 如 果 被 校 验 的 文件 正确 ， 将 
得 不 到 任何 回答 信息 ， 否 则 ， 将 给 出 210 下 RROR 铁 误 信息 
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( 苍 思 是 输入 /输出 错误 )。 

6.DELETE 命 令 

格式 ，DELETE f [，Vn] 

功能 ， 从 软盘 上 删除 所 指定 的 文件 ， 并 且 该 文件 不 被 加 
锁 。 

如 果 要 删除 的 文件 不 存在 ， 将 出 现 FILE NOT 
FOUND 如 果 该 文件 被 加 锁 ， 将 得 到 信息 FILE 
LOCKED。 


五 、 与 BASIC 程 序 有 关 的 DOS 命 令 


1.LOAD 命 今 

格式 ，LOAD f [，Van] 

功能 ， 从 软盘 上 装 入 一 个 BASIC 程 序 。 在 装 入 BASIC 
程序 时 ， 盘 上 的 文件 保持 不 变 ， 原 先 已 在 内 存 的 BASIC 程 
序 将 被 清除 。 

2.SAVE 命 今 

格式 ，SAVE f [，Van] 

功能 ， 将 已 建立 在 主机 内 存 中 的 BASIC 程序 副本 传送 
到 软盘 上 。 如 果 该 文件 名 在 软 称 上 已 存在 ， 而 且 文件 类 型 与 
系统 的 当前 状态 相 吻 合 ， 则 用 当前 已 在 内 存 中 的 BASIC 程 
序 赫 代 原 有 文件 。 因 此 ， 在 用 SAYVE 命 令 向 软盘 上 传送 文件 
时 ， 要 避免 重 名 。 

3.RUN 命 令 

烙 式 ， RUN 革 [， Van] 
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功能 ， 把 软 抢 上 的 某 一 BASIC 程序 f 装 入 到 内 存 并 送 
行 。 它 的 执行 步 又 是 ，@ 执 行 有 05S 的 LOAD 命令 ， 国 执行 
BASIC 的 RUN 命 令 。 


六 、 语 言 之 间 进 行 转换 的 D0S 命 令 


DOS 3,3 操作 系统 提供 了 APPLESOFT 解释 程序 和 
整数 BASIC 解 释 程 序 二 种 语言 相互 切换 的 命令 。 

1.1NT 命 令 

格式 ，INT 

功能 ， 使 系统 进入 整数 BASIC 状态 ， 并 清除 内 存 中 现 
有 程序 ， 恢 复 程 序 有 关 指 针 。 

2.FP 命 令 

格式 ，FP 

功能 ，APPLESOFT 程 序 又 称 为 浮 点 BASIC 程 序 ， 访 
命令 将 使 得 系统 进入 APPLESOFT 状态 ， 并 清除 内 存 中 现 
有 的 BASIC 程 序 ， 恢 复 各 有 关 指 针 。 


落 、 对 文本 文件 进行 操作 的 D0S 命 令 


文本 文件 是 用 来 存放 数据 信息 的 文件 ， 其 数据 信息 包括 
运算 数据 、 计 算 结果 、 信 和 件 的 副本 、 帐 单 和 表格 等 。 

文本 文件 按 其 存 取 方式 可 以 分 成 顺序 文件 和 随机 文件 。 
这 两 种 文件 在 用 CATALOSG 命令 列 磁 盘 目 孙 时 , 均 以 字母 T 
作为 类 型 标志 符 。 但 是 这 两 种 文件 的 使 用 方法 和 存 贮 格 式 有 
所 不 同 。 下 面 分 别 介绍 这 两 种 文件 的 存 取 方 式 及 与 其 对 应 的 
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DOS 命 令 。 

1. 原 序 文 件 

顺序 文件 由 数据 域 组 成 ， 每 个 数据 域 由 回 车 字符 作为 终 
止 标志 。 通 常 由 不 带 逼 号 和 分 号 的 PRINT 语句 自动 生成 ， 
也 可 以 由 CHR 名 (13) 字符 来 产生 。 顺 序 文件 在 软盘 上 是 连 
续 存 放 的， 各 个 数据 域 之 间 没 有 间隙 ， 其 数据 域 的 长 度 和 文 
件 长 度 可 是 任意 的 。 

(1) OPEN 命 令 

格式 ，OPEN fT [，Vo] 

功能 ， 打 开 一 顺序 文件 荆 ， 如 果 该 文件 不 存在 ， 则 在 磁 
椒 的 目录 上 创建 该 文件 。 在 对 某 一 文件 进行 读 操 作 或 写 操作 
之 前 ， 首 先 必 须 打 开 该 文件 。 程 序 一 次 打开 的 文件 个 数 是 由 
MAXEFILES 命 令 所 决定 ， 最 多 不 得 超过 16 个 ，DOS 启 动 后 
将 自动 执行 MAXFILE3 命令 ， 此 时 系统 允许 打开 的 文件 个 
数 最 多 为 3 个 。 

(2) CLOSE 命令 

格式 ，CLOSE [f 

功能 ， 关 闭 名 为 王 的 文件 ， 当 文件 名 省 略 时 ， 将 关闭 所 
有 已 打开 的 文件 。 对 某 一 文本 文件 在 完成 读 / 写 操作 后 必须 
关闭 ， 以 收回 分 配给 该 文件 的 文件 缓冲 区 。 

(3) WRITE 命令 

格式 ，WRITE f [，Bn] 

功能 ， 对 已 打开 的 文件 { 执行 写 操作 。 人 参数 Bn 指出 从 
时 译文 件 的 第 n 个 字 节 开始 写 数据 ， 如 果 些 参数 省 略 ， 将 从 
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第 0 个 字 节 开始 写 数 据 。 

(4) RERATD 命 令 

格式 ，READ f [，Ba] 

功能 ， 对 已 打开 的 文件 执行 读 操作 ， 人 参数 Bn 指出 从 
顺序 文件 第 n 个 字 节 开始 读数 据 ， 如 果 此 参数 省 略 ， 将 从 第 
0 个 字 节 开始 读数 据 。 

(5) APPEND 命 令 

格式 ，APPEND {f[，Van] 

功能 , 自动 打开 顺序 文件 ,并 把 文件 指针 移 到 文件 的 来 
尾 ， 然 后 利用 WRITE 命令 可 以 在 文件 的 来 尾 增 加 新 的 信 
息 。 

(6) POSITION 命令 

格式 ，POSITION f [，Rn] 

功能 ， 用 来 对 顺序 文件 在 执 行 定 位 操作 ， 可 以 把 文件 位 
置 指 针 从 当前 位 置 ， 移 到 下 面 第 n 个 域 的 起 始 位 置 。 参数 
Ra 指出 当前 位 置 的 第 n 个 域 ， 当 参数 Rn 省 略 时 ， 表 示 不 移 
动 文件 的 位 置 指 针 。 例 如 ，POSITION G2 R3 即将 文件 
位 置 指针 移 至 顺序 文件 G2 的 第 3 个 域 的 起 始 位 置 。 

POSITION 命令 必须 用 在 WRITE 和 READ 命 令 之 前 ， 
否则 ， 使 用 过 POSITION 命令 之 后 , 还 需要 重新 使 用 READ 
或 WRITE 命令 才能 执行 读 操作 或 号 操作 。 

2 .随机 文件 

随机 文书 由 记录 组 成 ， 以 记录 为 单位 进行 数据 的 读 操作 
和 写 操作 ， 等 个 记录 中 可 以 包含 若干 个 数据 域 。 各 个 记录 的 
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长 度 是 园 定 的 ;一 个 记录 的 最 大 长 度 是 32767 个 字符 。 

使 用 中 机 文件 ， 可 以 实现 快速 查找 ， 增 补 或 修改 其 中 任 
一 记录 中 的 数据 ， 然 而 却 不 会 影响 其 它 记 录 中 的 内 容 。 

(D. OPEN 命令 

格式 ，OPEN f，L [，Van] 

功能 ， 打 开 一 随机 文件 f， 其 记录 长 度 由 参 数 工 来 决 
定 ， 它 是 1 一 32767 之 间 的 数 。 

(2) CLOSE 命令 

格式 ，CLOSE [f 

功能 ， 关 闭 名 字 为 持 的 文件 ， 若 不 给 出 文件 名 ， 将 关闭 
所 有 打开 的 文件 。 
(5) WRITE 命令 
格式 ，WRITE f [，Rn] [，Bn] 
功能 ， 对 随机 文件 工 进 行 写 操作 。 
Rn: 指出 对 随机 文件 中 执行 写 操作 的 记录 号 ， 若 Rn 省 
将 从 记录 0 开始 写 。 
Ban， 指 出 从 该 记录 第 an 个 字 节 开 始 执行 写 操作 ， 若 Bn 
省 略 ， 将 从 此 记录 的 0 字 节 开始 写 。 

(4) 有 了 READ 丛 令 

格式 ，READ ft [，Rn] [，Bn] 

功能 ， 对 随机 文件 执行 读 操作 。 

Ran， 为 0~32767 之 间 的 数字 。 指 出 对 随机 文件 中 执 
行 写 操作 的 记录 号 ， 若 Rn 省 略 ， 将 从 记录 0 开始 写 。 

Ba， 指 出 从 该 记录 第 na 个 字 节 开 始 执行 读 操 作 ， 若 Bn 
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略 


后 


和 省略， 将 从 此 记录 的 0 字 节 开始 写 。 
八 、 对 2 进 制 文件 进行 操作 的 DOS 全 邻 


2 进 制 文件 存放 的 是 主机 内 存 中 的 2 进 制 信息 副本 ， 即 
把 主机 内 存 中 某 个 地 址 段 的 信息 以 文件 的 形式 保存 在 软盘 
上 。 在 文件 目录 中 ， 2 进 制 文件 的 类 型 标志 是 B 文件。 

(1) BSAVE 命 令 

格式 ，BSAVE f，An，Ln [，Vn] 

功能 ， 把 内 存 中 以 An 为 起 始 地 址 ， 长 度 为 Ln 的 二 进 制 
文件 工 保存 在 软盘 上 。 

Aa:， na 是 0~65535 之 间 的 内 存 地 址 ， 指 明了 要 存储 的 
2 进 制 信息 在 内 存 中 的 起 始 地 址 。 

La，a 是 0 一 32767 之 间 的 数 ， 指 出 要 传送 的 内 存 字 节 
数 。 

(2) BLOAD 命 令 

格式 ，BLOAD f [，Aan][，YVan] 

功能 ， 将 盘 上 的 2 进 制 文件 工装 入 到 主机 内 存 由 参数 
An 为 首 地 址 的 区 域 中 。 

An' na 是 0~65535 的 内 存 地址 ， 表 示 文 件 工 存 入 内 存 
的 首 地 址 ， 若 此 参数 省 略 时 ， 其 起 始 地 址 为 该 文件 由 
BSAYVE 写 入 时 所 对 应 的 An 值 。 

(3) BRUN 命 令 

格式 ，BRUN {f [，An]j [，Van] 

功能 ， 首 先 装 入 以 为 文件 名 的 2 进 制 文件 ， 然 后 转移 
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浏 该 文件 以 参数 An 为 起 始 邮 址 去 执行 。 其 中 参数 An 所 给 出 
指 地 址 要 和 建立 该 文件 时 起 始 地 址 禄 一 致 。 

妨 、 锚 二 命 令 

(MON 命令 

格式 ，MON [FC] [， 了 HT [，O] 

功能 ， 在 用 程序 方式 调用 DOS 命令 时 ，DOS 命 令 及 主 
机 与 磁盘 之 间 的 信息 交换 在 屏幕 上 不 表现 出 来 ， 为 了 方便 程 
序 的 调试 ， 我 们 可 以 用 MON 命 令 来 实现 监视 信息 。 

些 命令 有 三 个 参数 可 供 选择 ， 

C:， 显示 所 有 的 DOS5 命 令 ; 

I， 显 示 由 软盘 读 入 主机 的 信息 

OO， 显示 由 主机 号 入 软盘 的 信息 。 

(2) NOMON 命 令 

格式 ，NOMON [C] [， 口 [，O]j 

功能 ,终止 MON 命令 的 执行 ， 也 就 是 撤除 监视 。 其 参 
数 的 含义 和 使 用 方法 和 MON 命令 完全 相同 。 
(3) 卫 肛 # 
格式 :PR 和 aa 
功能 ， 将 输出 字符 送 到 第 n 号 槽 口 记 连接 的 输出 设备 
n 可 以 是 0 一 7 之 间 的 整数 。 
对 于 中 华 学 习 机 来 说 ,na=0 表示 屏幕 显示 ，a=3 表 示 进 
入 汉字 系统 ，n = 一 6 表 示 从 软盘 上 引导 DOS 操 作 系统 。 

如 果 我 们 在 中 华 学 习 机 扩充 槽 内 接 有 打印 机 且 模 口 定义 
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为 工 号 ， 要 打印 数据 ， 可 用 PR 村 来 选 定 打印 视 。 
《4) IN# 命 令 


格式 : TIN#n 
功能 ， 从 第 a 号 本 口 所 连接 的 输入 设备 接受 信息 ， 其 中 
屏 可 以 是 0 一 7 之 间 的 整数 。 


对 于 中 华 学 习 机 来 说 ，n=0 表 示 从 键盘 接受 信息 。 

(5) MAXEFILES 命 令 

格式 ，MAXEFILES nm 

功能 ， 指 出 一 次 能 够 打开 的 文件 数 ，za 为 1 一 16 之 问 的 
整数 。 

(6) 刁 XEC 命 令 

格式 ，EXEC f，[，Rn] [，Vn] 

功能 ， 指 导 DOS 从 命令 文件 而 不 是 从 键盘 获取 命令 虽 
可 以 从 命令 文件 的 任何 一 行 开 始 执行 。 

其 中 ，Ra 的 na 是 0~ 32767 之 间 的 数字 ， 指 出 命令 文件 
跳 过 的 行 数 ， 如 果 省 略 ， DOS 将 从 命令 文件 让 第 一 行 开 始 
执行 。 
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